# slave

open my $fh, '<', 'filelist';
print "List of files to process:\n";
print while <$fh>;
close $fh;