Select Code to Download

if ($? == -1) { print "failed to execute: $!\n" }
elsif ($? & 127)
    { printf "child died with signal %d, %s coredump\n",
        ($? & 127),  ($? & 128) ? 'with' : 'without' }
else { printf "child exited with value %d\n", $? >> 8 }

use IPC::System::Simple qw/capturex/;
my @flush = capturex('/soft/perl-5.16.3/bin/perl',
...
    '--script=/users/iax00/exploit/script/iax_0tasksimp.pl',
    '--script-prefix='.$ENV{UNXEXSCRIPT}.'/start /soft/perl-5.16.3/bin
+/perl',
    '--script-params=-m -v 2 --config-file /users/iax00/exploit/data/i
+axfcverifTomcat_admin_portal.xml');