Lines Matching refs:filerec
1317 local (@filerec) = ( $file, $cstr );
1318 push @allfiles, \@filerec;
1327 local (@filerec) = ( $file, $optfiles{$file} );
1328 push @allfiles, \@filerec;
1337 local (@filerec) = ( $file, $scriptfiles{$file} );
1338 push @allfiles, \@filerec;
1373 local (@filerec) = ( $file, $cstr );
1374 push @allfiles, \@filerec;
1534 $filerec = $allfiles[$i];
1536 delete $scriptfiles{$$filerec[0]};
1539 print "Saving $$filerec[0]\n" if $opt_v;
1540 $$filerec[0] =~ m+(.*)/+;
1572 local ($fname) = $$filerec[0];
1581 if (sysopen(OUTFILE, $$filerec[0], O_WRONLY|O_CREAT|O_TRUNC, 0600)) {
1582 print OUTFILE $$filerec[1] || ($fileerr = $!);
1587 warn "Unable to write $$filerec[0]: $fileerr\n" if $fileerr;