$code ||= $unit;
if (ref $args) {
    @args =  @$args;
    $code .= q{(@args)};
} else {
    @args = ();
}
@ARGV = @$argv if ref $argv;