Movatterモバイル変換


[0]ホーム

URL:


functions /exec
(source,CPAN)
You are viewing the version of this documentation from Perl 5.6.0.View the latest version
#exec LIST
#exec PROGRAM LIST

Theexec function executes a system commandand never returns-- usesystem instead ofexec if you want it to return. It fails and returns false only if the command does not existand it is executed directly instead of via your system's command shell (see below).

Since it's a common mistake to useexec instead ofsystem, Perl warns you if there is a following statement which isn'tdie,warn, orexit (if-w is set - but you always do that). If youreally want to follow anexec with some other statement, you can use one of these styles to avoid the warning:

exec ('foo')   or print STDERR "couldn't exec foo: $!";{ exec ('foo') }; print STDERR "couldn't exec foo: $!";

If there is more than one argument in LIST, or if LIST is an array with more than one value, calls execvp(3) with the arguments in LIST. If there is only one scalar argument or an array with one element in it, the argument is checked for shell metacharacters, and if there are any, the entire argument is passed to the system's command shell for parsing (this is/bin/sh -c on Unix platforms, but varies on other platforms). If there are no shell metacharacters in the argument, it is split into words and passed directly toexecvp, which is more efficient. Examples:

exec '/bin/echo', 'Your arguments are: ', @ARGV;exec "sort $outfile | uniq";

If you don't really want to execute the first argument, but want to lie to the program you are executing about its own name, you can specify the program you actually want to run as an "indirect object" (without a comma) in front of the LIST. (This always forces interpretation of the LIST as a multivalued list, even if there is only a single scalar in the list.) Example:

$shell = '/bin/csh';exec $shell '-sh';# pretend it's a login shell

or, more directly,

exec {'/bin/csh'} '-sh';# pretend it's a login shell

When the arguments get executed via the system shell, results will be subject to its quirks and capabilities. See"`STRING`" in perlop for details.

Using an indirect object withexec orsystem is also more secure. This usage (which also works fine with system()) forces interpretation of the arguments as a multivalued list, even if the list had just one argument. That way you're safe from the shell expanding wildcards or splitting up words with whitespace in them.

@args = ( "echo surprise" );exec @args;               # subject to shell escapes                            # if @args == 1exec { $args[0] } @args;  # safe even with one-arg list

The first version, the one without the indirect object, ran theecho program, passing it"surprise" an argument. The second version didn't--it tried to run a program literally called"echo surprise", didn't find it, and set$? to a non-zero value indicating failure.

Beginning with v5.6.0, Perl will attempt to flush all files opened for output before the exec, but this may not be supported on some platforms (seeperlport). To be safe, you may need to set$| ($AUTOFLUSH in English) or call theautoflush() method ofIO::Handle on any open handles in order to avoid lost output.

Note thatexec will not call yourEND blocks, nor will it call anyDESTROY methods in your objects.

Perldoc Browser is maintained by Dan Book (DBOOK). Please contact him via theGitHub issue tracker oremail regarding any issues with the site itself, search, or rendering of documentation.

The Perl documentation is maintained by the Perl 5 Porters in the development of Perl. Please contact them via thePerl issue tracker, themailing list, orIRC to report any issues with the contents or format of the documentation.


[8]ページ先頭

©2009-2025 Movatter.jp