[comp.lang.perl] Perl 4 pl 10 bug with file tests

cruff@ncar.ucar.edu (Craig Ruff) (06/25/91)

When using the saved lstat information, the use of any non '-l' file test
results in the loss of memory about which type of stat was performed.
For example:

	$name = 'symbolic_link';
	lstat($name) || die "could not lstat $name: $!\n";
	print "dir\n" if (-d _);
	print "symlink\n" if (-l _);

gives this as an error:

	The stat preceding -l _ wasn't an lstat at t.pl line 5.
-- 
Craig Ruff      	NCAR			cruff@ncar.ucar.edu
(303) 497-1211  	P.O. Box 3000
			Boulder, CO  80307