Help for this page
foreach my $tool (@$tools) { my $edit_tool = $tool; $edit_tool =~ s/<infile>/$file/ or next; }