On Tue Mar 04 08:42:27 2008, tut@bambra.net wrote:
Show quoted text> Hi,
>
> I tested the module and have a problem again :( It works with files
> correctly but it is broken with my /tmp folder:
This is a completely different bug. I can reproduce it here on my
machine with my /tmp. Two comments:
1. Please don't comment on resolved bugs - this just opens them.
Instead, file a new bug.
2. You shouldn't have pasted the object dump. It contains a listing of
many of the files in your /tmp directory, which may have privacy and
security issues. Next time, please email them to me in private.
Regards,
Shlomi Fish
Show quoted text> =======================================================
> use File::Find::Object;
> my $tree = File::Find::Object->new({}, '/tmp');
>
> while (my $r = $tree->next()) {
> print $r ."\n";
> }
> =======================================================
>
> Script prints such error:
> =======================================================
> Current is undef
at /usr/lib/perl5/site_perl/5.8.5/File/Find/Object.pm
Show quoted text> line 131
>
File::Find::Object::_father('File::Find::Object=HASH(0x804cb44)',
Show quoted text> 'undef') called
at /usr/lib/perl5/site_perl/5.8.5/File/Find/Object.pm
Show quoted text> line 151
>
File::Find::Object::_movenext_with_current('File::Find::Object=HASH(0x804cb44)')
Show quoted text> called at /usr/lib/perl5/site_perl/5.8.5/File/Find/Object.pm line
205
Show quoted text>
File::Find::Object::_movenext('File::Find::Object=HASH(0x804cb44)')
Show quoted text> called at /usr/lib/perl5/site_perl/5.8.5/File/Find/Object.pm line
114
Show quoted text> File::Find::Object::next('File::Find::Object=HASH(0x804cb44)')
called
Show quoted text> at 3.pl line 5
> =======================================================
>
> and it's output with object dump is attached. Can you check this?
>
> Shlomi Fish via RT пишет:
> have any
> > further questions or concerns, please respond to this message.
>