Lines Matching refs:outfile
126 $outfile = "OUTFILE";
128 else { $outfile = "STDOUT"; }
130 printf($outfile "Perl $] Regular Expressions\n\n");
139 printf $outfile "$_" if ! $interact;
164 printf $outfile "** Warning: \"$mod\" in #subject ignored\n";
172 printf $outfile "** Warning: #-command ignored: %s", $_;
183 printf $outfile "$_" if ! $interact;
248 printf $outfile "Error: $@";
281 printf $outfile "%s", "$_\n" if ! $interact;
329 printf $outfile "Error: $@\n";
334 printf $outfile "No match";
336 { printf $outfile (", mark = %s", &pchars($REGERROR)); }
337 printf $outfile "\n";
343 printf $outfile (" 0: %s\n", &pchars($subs[0]));
344 printf $outfile (" 0+ %s\n", &pchars($subs[17])) if $showrest;
351 { printf $outfile ("%2d: <unset>\n", $last_printed); }
352 printf $outfile ("%2d: %s\n", $i, &pchars($subs[$i]));
367 printf $outfile ("MK: %s\n", &pchars($xx));