I forgot that @ in strings must be escaped in Perl