/usr/bin/execflow is in libevent-execflow-perl 0.64-0ubuntu3.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | #!/usr/bin/perl
eval 'exec /usr/bin/perl -S $0 ${1+"$@"}'
if 0; # not running under some shell
# $Id: execflow,v 1.1 2006/02/27 13:36:11 joern Exp $
use strict;
use Getopt::Std;
my $USAGE = <<__EOU;
Usage: execflow [-n nice] command options ...
__EOU
main: {
my %opt;
my $opt_ok = getopts ('n:', \%opt);
usage() if not $opt_ok or !@ARGV;
my $nice = $opt{n};
print STDERR "EXEC_FLOW_JOB_PID=$$\n";
exec "nice", "-n", $nice, @ARGV if $nice;
exec @ARGV;
}
sub usage {
print $USAGE;
exit 1;
}
|