Mega Code Archive

 

Categories / Perl / System Functions

 

Read system command and execute

#!/usr/local/bin/perl -T $ENV{'PATH'} = '/bin:/usr/bin:/usr/local/bin'; while (<>) {    $command = $_;    system($command);     }