Select Code to Download

   if ( (undef,undef) ) { }   # a list of undefs is false

   @arr = (undef,undef);
   if ( @arr ) {}             # an array of undefs is true

   $_ = 'x';
   if (($a,$b) = m/(.)(.)/) { }