Date: 2008oct29 Language: perl Q. Because the undef function in only takes one argument to undefine $a $b $c I need to write:

undef $a; undef $b; undef $c;

Is there a more compact way? A. You can do:

$a = $b = $c = undef;