Recipe 7.4 Making Perl Report Filenames in Error Messages
open($path, "<", $path) or die "Couldn't open $path for reading : $!\n";
Ordinarily, error messages say:
Argument "3\n" isn't numeric in multiply at tallyweb line 16, <LOG> chunk 17.
The filehandle LOG doesn't help much because you don't know which file the handle was connected to. By using the filename itself as indirect filehandle, Perl produces more informative errors and warnings:
Argument "3\n" isn't numeric in multiply at tallyweb line 16, </usr/local/data/mylog3.dat> chunk 17.
Unfortunately, this doesn't work with strict refs turned on because the variable $path doesn't really have a filehandle in it, only a string that sometimes behaves like one. The chunk number mentioned in warnings and error messages is the current value of the $. variable.
7.4.4 See Also
Recipe 7.1; the open function in perlfunc(1) and Chapter 29 of Programming Perl