my $cmd= sub {
    my $commandline= "my/external/program --foo=param1 --bar=param2";
    system($commandline) == 0
        or warn "Couldn't launch [$commandline]: $!/$?";
};