I'd set the filehandle to binmode to make it work under Win32 as well, slurp the file, and use open with three params to prevent filenames like ">xyz.jpg" (but well, you caught that in the -e $filename), e.g:
unless( open( my $fh, '<', $cache ) ) { warn "Thumbnail.pm: $! opening $cache\n"; } else { local $/; binmode $fh; print <$fh>; };
Best regards,
perl -e "s>>*F>e=>y)\*martinF)stronat)=>print,print v8.8.8.32.11.32"
In reply to Re: Before uploading my module...
by strat
in thread Before uploading my module...
by FloydATC
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |