Help for this page

Select Code to Download

Select or download this

perl -e "my $str='foo@bar'; if ($str =~ /@/){ print \"No need to escap
+e the \@ in a regex\";}"
No need to escape the @ in a regex

Select or download this

perl -e "my $str='@bar'; if ($str =~ /^@/){ print \"No need to escape 
+the \@ in a regex\";}"
No need to escape the @ in a regex