This works for me:
$ perl -MFile::Find -we'$obj=bless []; sub found { print "looking at $ +_\n" } > find(sub {$obj->found}, "pbed/fooble")' looking at . looking at a looking at b looking at c
In reply to Re: Re: Re: File::Find incompatible with OO perl?
by ysth
in thread File::Find incompatible with OO perl?
by vaevictus
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |