Hello Everybody,
I want to use File::Find from within Embperl. With the following code
[-
use Image::Magick;
use File::Find;
$directory[0] = "bilddatenbank";
find(\&wanted, @directory);
sub wanted {
if ( /.*\.jpg/i || /.*\.gif/i ) {
print "$File::Find::name\n\n";
}
}
-]
I get the error
[874]ERR: 24: Error in Perl code: Can't use string ("") as a subroutine ref
while "strict refs" in use at /usr/lib/perl5/5.6.1/File/Find.pm line 450.
BTW my configuration details:
Apache/1.3.20 (Linux/SuSE) PHP/4.0.6 mod_perl/1.26 HTML::Embperl 1.3.4
Can anybody please tell me what to do?
TIA,
Ole
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
