Select Code to Download

exec("grep $serial logs* > $serial.log");

open(SERIALS, "serials.txt") or die("can't open serials.txt");
@serials = <SERIALS>;
...
    print "now processing $serial";
    exec("grep $serial logs* > $serial.log");
}