in reply to File::Find and $_ in the wanted sub
Localizing $_ is an option, also:
#!/usr/bin/perl use File::Find; #find (\&testy, "."); $_ = 'Main Line...'; testy ('i am a nice parameter'); print "$_\n"; sub testy { local $_ = shift; #Localizing it is cool, also..... print "$_\n" ; } __END__ ~Output~~ i am a nice parameter Main Line...
Good luck. -c
PS: The first parameter passed to a sub is in the first element of the list @_, $_[0], which is NOT the same a $_.
In Section
Seekers of Perl Wisdom