Help for this page

Select Code to Download


  1. or download this
    sub executeCommand_wrong {
      my $command = join ' ', @_;
    ...
    __END__
    [ciao] -> [0]
    [ciao] -> [1]
    
  2. or download this
    sub executeCommand {
      my $command = join ' ', @_;
      reverse ($_ = qx{$command 2>&1}, $? >> 8);
    }