"Mr. Shawn H. Corey" <[EMAIL PROTECTED]> writes:
[...]
>>
>> find(\&wanted, @finddir) or die " Failed to open
>> finddir <$finddir>: $!";
>
> You have not defined the scalar $finddir. You have defined the array
> @finddir, but it's not the same.
Sorry, yes you're right but I actually caught that one myself. Somehow I
got an earlier version of the script into my post. You can tell from
the error messages I posted that the scalar was fixed since it wasn't
reported. (There isn't supposed to be a scalar there at all.. it was
a typo)
[...]
>> $res = $mm->checktype_filename($testfile);
>> if ($res =~ /^plain\/text/) {
>> open(FILE,"<$File::Find::dir") or die "Can't open <$File::Find::dir>:
>> $!";
>
> You can't open a directory. Should this be $File::Find::fullname ?
Yikes your right. The other errors I posted never let me get this
far. That should say File::Find::name... more sloppyness on my
part... thanks.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
