Help for this page

Select Code to Download

Select or download this

$ perl -wle'print q{@@x} =~ m|\A\Q@@x\E\z| ? "match" : "no match"'
Possible unintended interpolation of @x in string at -e line 1.
...

$ perl -wle'print q{@@x} =~ m|\A@\@x\z| ? "match" : "no match"'
match