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/(.)(.)/) { }