develooper Front page | perl.perl5.porters | Postings from June 2004

File::Find suggested patch

From:
James Freeman
Date:
June 30, 2004 02:06
Subject:
File::Find suggested patch
Message ID:
AAEJIJCOEJLIPOBNGNIKOEICCPAA.james.freeman@smartsurf.org
Hi Nick,

I think there are some valid arguments for formally passing args to the
&wanted sub. For background see
http://www.perlmonks.org/index.pl?node_id=370566

It appears to me this can be achieved by replacing all the calls to:

{ &$wanted_callback }; # protect against wild "next"

with this.

{ my $save=$_; &$wanted_callback($save,$name,$dir); $_=$save };

Kind regards

Dr James Freeman



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About