in reply to Case Exhaustion Tree
$code ||= $unit; if (ref $args) { @args = @$args; $code .= q{(@args)}; } else { @args = (); } @ARGV = @$argv if ref $argv;
YMMV.
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: Case Exhaustion Tree
by Xiong (Hermit) on Feb 03, 2014 at 18:36 UTC |