http://www.perlmonks.org?node_id=616960


in reply to Before uploading my module...

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"