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.