Select Code to Download

system("some_command");

...
else {
   die "child exited with value %d\n", $? >> 8;
}

use IPC::System::Simple qw(run);

run("some_command");

use IPC::System::Simple qw(run);

run("foo");               # No meta-chars, shell never used
run("bar | bar");         # Meta-chars, shell always used.
run("foo", "bar", "<baz") # Multi-arg, shell never used.