Select Code to Download

if( ()=(0,0) ) {
  print "sometimes you're counting the things in the list and getting 
+2.\n"
...
if( (0,0) ) {
   print "sometimes you're applying the comma operator and getting und
+ef (last)\n";
}

use Data::Dumper;
print Dumper({ test1=>scalar( 7,13 ), test2=>scalar( ()=(7,13) ) }), "
+\n";