in reply to regular expression with @@/

Interesting!
[keszler@tek src]# perl -le ' $x = "asdfXXsadf"; print "match" if $x =~ /\QXX\E/; ' match [keszler@tek src]# perl -le ' $x = "asdf@@sadf"; print "match" if $x =~ /@@/; ' [keszler@tek src]# perl -le ' $x = "asdf@@sadf"; print "match" if $x =~ /\Q@@\E/; ' [keszler@tek src]# perl -le ' $x = "asdf@@sadf"; print "match" if $x =~ /\@\@/; ' [keszler@tek src]# perl -le ' $x = "asdf@@sadf"; print "match" if $x =~ /@/; ' match [keszler@tek src]# perl -le ' $x = "asdf@@sadf"; print "match" if $x =~ /@{2}/; ' match

Replies are listed 'Best First'.
Re^2: regular expression with @@/
by almut (Canon) on Dec 07, 2009 at 18:16 UTC
    $ perl -wle ' $x = "asdf@@sadf"; print "match" if $x =~ /\Q@@\E/; ' Possible unintended interpolation of @sadf in string at -e line 2. Name "main::sadf" used only once: possible typo at -e line 2.

    :)