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 undef (last)\n";
}

##</code><code>##

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