Lines Matching refs:fname
124 my ($directory, $fname, $out_file) = @_;
125 print "$directory/$fname\n";
126 open INPUT, "$directory/$fname" or warn "can't open $directory/$fname: $!";
128 print OUTPUT "$fname\n";
146 warn "ignoring loop offset $Fld[2] (file $fname, line $.)\n";
184 warn "no valid lines in $directory/$fname";
193 my ($directory, $fname, $out_file) = @_;
194 print "$directory/$fname\n";
195 open INPUT, "$directory/$fname" or warn "can't open $directory/$fname: $!";
197 print OUTPUT "$fname\n";
226 warn "ignoring peer offset $offs (file $fname, line $.)\n";
285 my ($directory, $fname, $out_file) = @_;
286 print "$directory/$fname\n";
287 open INPUT, "$directory/$fname";
289 print OUTPUT "$fname\n";