In situations like these, I've been arguing for goto LABEL:
find( sub { ...; --$fnlinks or goto DONE; }, $dir ); DONE: ...
It has twothree advantages over the eval/die pair:
it makes your intention more clear;
it is better prepared for future versions of File::Find, that just might treat die-ing callbacks differently (that the eval/die pair works does not follow from the documentation); and
as Fletch++ notes, eval/die is prone to hiding errors as other code dies. goto LABEL has no corresponding weakness.
The last LABEL version is similar, but noisy under -w or use warnings; generating Exiting subroutine via last warnings.
Besides, goto LABEL is more readable still.
print "Just another Perl ${\(trickster and hacker)},"
The Sidhekin proves Sidhe did it!
In reply to Re: aborting File::Find::find
by Sidhekin
in thread aborting File::Find::find
by marvell
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |