use IPC::System::Simple qw/capturex/; my @flush = capturex('/soft/perl-5.16.3/bin/perl', '/users/iax00/exploit/script/iax_0taskchklog.pl', '-m','--timeout=10','--success-code=0', '--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/iaxfcverifTomcat_admin_portal.xml');