use strict; use warnings; my $log = 'logfile.txt'; unlink $log if -e $log; for (1..10) { system("perl delay.pl $_ $log &"); }