Create a new local $_ without triggering tie by using local *_ = \my $a
authorNicholas Clark <nick@ccl4.org>
Fri, 27 Feb 2004 16:27:19 +0000 (16:27 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 27 Feb 2004 16:27:19 +0000 (16:27 +0000)
commitbc125c03185ff3f765451ef53228eea11c0d525f
tree8e12d4f8f15467759b126f8d25870ca3568c4896
parent15173bafc9a5b667aebe0799fa96768116798dec
Create a new local $_ without triggering tie by using local *_ = \my $a
(an idea from Ton Hospel, Message-Id: <c1igq3$n84$1@post.home.lunix>)

p4raw-id: //depot/perl@22401
lib/File/Find.pm
lib/File/Find/t/find.t