Add missing my keyword to generic receiver
This commit is contained in:
parent
a40f72ce6a
commit
e77dde544d
|
|
@ -103,7 +103,7 @@ sub recv_generic {
|
|||
open my $fhz, '>>', "$lib/results/$logname";
|
||||
opendir my $dir, "/tmp";
|
||||
|
||||
foreach $of (grep (/par.+\.par/i, readdir $dir)) {
|
||||
foreach my $of (grep (/par.+\.par/i, readdir $dir)) {
|
||||
print $fhz -s "/tmp/$of";
|
||||
print $fhz "\n";
|
||||
unlink "/tmp/$of";
|
||||
|
|
|
|||
Loading…
Reference in New Issue