Help for this page

Select Code to Download


  1. or download this
    $ perl -e '%x=(1 => 2); if(@x{1, 2}) { print "yes\n" } else { print "n
+o\n" }'
no
  2. or download this
    $ perl -e '%x=(1 => 2); if(@{[@x{1, 2}]}) { print "yes\n" } else { pri
+nt "no\n" }'
yes