Lines Matching refs:cmd
311 sub cmd { subroutine
312 my $cmd = shift;
317 my @cmdargs = ( @$cmd );
326 my $cmd = shift;
329 my @cmdargs = ( @{$cmd} );
331 return cmd([ @prog, @cmdargs ],
337 my $cmd = shift;
340 my @cmdargs = ( @{$cmd} );
342 return cmd([ @prog, @cmdargs ],
348 my $cmd = shift;
351 my @cmdargs = ( @{$cmd} );
353 return cmd([ @prog, @cmdargs ],
359 my $cmd = shift;
365 my @cmdargs = ( @{$cmd} );
367 return cmd([ @interpreter, @interpreter_args,
373 my $cmd = shift;
379 my @cmdargs = ( @{$cmd} );
381 return cmd([ @interpreter, @interpreter_args,
432 my ($cmd, $display_cmd) = shift->(0);
435 return () if !$cmd;
476 open($pipe, '-|', "$prefix$cmd") or die "Can't start command: $!";
488 system("$prefix$cmd");
827 my ($cmd, $display_cmd) = shift->(0);
833 return $cmd;
1221 my $cmd = shift;
1246 return (@prefix, $cmd);
1275 my $cmd = shift;
1278 my $cmdstr = join(" ", @$cmd);
