my @args ; if ( @_ == 1 && ! ref $_[0] ) { if ( Win32_MODE ) { @args = ( [ qw( command /c ), win32_parse_cmd_line $_[0] ] ) ; } else { @args = ( [ qw( sh -c ), @_ ] ) ; } } elsif ( @_ > 1 && ! grep ref $_, @_ ) { @args = ( [ @_ ] ) ; } else { @args = @_ ; }