- or download this
#!/usr/bin/perl -w
use strict;
...
# print the resulting list of missing processes
print map "NF: $_\n", @missing;
- or download this
#!/usr/bin/perl -w
use strict;
...
/oasis/bin/sysmenu
/oasis/bin/TS_TextSrvcs
);
- or download this
my %procs = map { chomp; $_ => undef } qx/ps -a ho comm/;