Re^3: aborting File::Find::find

Well, I'll agree that one sane solution would be to patch File::Find. Provided you have the time, and the patch is accepted, that is. Meawhile, though we may disagree, I maintain that goto LABEL is another. :-)

Test::Trap uses goto LABEL. (It's the second goto in the source; the first is a goto &function.)

Tough? Since it calls into user code that may contain arbitrary many levels of subroutine calls and/or eval, I see no way to do it without a LABEL, and I'll argue that goto LABEL is more readable than last LABEL where, as here, the latter would require the addition of a loop-once block and a no warnings 'exiting'.

print "Just another Perl ${\(trickster and hacker)},"
The Sidhekin proves Sidhe did it!

Comment on Re^3: aborting File::Find::find Select or Download Code

Replies are listed 'Best First'.
Re^4: aborting File::Find::find by Limbic~Region (Chancellor) on Nov 16, 2006 at 20:11 UTC
Sidhekin, I will look into Test::Trap as promised. ... and I'll argue that `goto LABEL` is more readable than `last LABEL` where, as here, the latter would require the addition of a loop-once block and a `no warnings 'exiting'`. I just want to make it clear for those following along at home that your comment applies to the label solution proposed by jdporter and not my proposed patching of File::Find which would work cleanly. Cheers - L~R	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^4: aborting File::Find::find
by Limbic~Region (Chancellor) on Nov 16, 2006 at 20:11 UTC

Sidhekin

Test::Trap

... and I'll argue that goto LABEL is more readable than last LABEL where, as here, the latter would require the addition of a loop-once block and a no warnings 'exiting'.

jdporter

File::Find

Cheers - L~R

[reply]
[d/l]
[select]