use IPC::System::Simple qw( system );

system($_)
   for split /\n/ <<'__EOI__';
batch -b -submit abcd.txt
perlscript features.txt
perldata data.txt
__EOI__