Searched refs:fhname (Results 1 – 5 of 5) sorted by relevance
11 my $fhname = "FH1";27 my $fh = \*{$fhname++};
716 Perl_no_bareword_filehandle(pTHX_ const char *fhname) { in Perl_no_bareword_filehandle() argument719 if (strNE(fhname, "STDERR") in Perl_no_bareword_filehandle()720 && strNE(fhname, "STDOUT") in Perl_no_bareword_filehandle()721 && strNE(fhname, "STDIN") in Perl_no_bareword_filehandle()722 && strNE(fhname, "_") in Perl_no_bareword_filehandle()723 && strNE(fhname, "ARGV") in Perl_no_bareword_filehandle()724 && strNE(fhname, "ARGVOUT") in Perl_no_bareword_filehandle()725 && strNE(fhname, "DATA")) { in Perl_no_bareword_filehandle()726 …HX_ "Bareword filehandle \"%s\" not allowed under 'no feature \"bareword_filehandles\"'", fhname)); in Perl_no_bareword_filehandle()
3138 Perl_no_bareword_filehandle(pTHX_ const char *fhname)3141 assert(fhname)
2333 |NN const char *fhname
2966 p |void |no_bareword_filehandle|NN const char *fhname