($from, $to) = (); undef $_ for $from, $to; map undef $_, $from, $to; $from = $to = undef; #### undef $from, $to = 3 if $from > $to;