unless( open( my $fh, '<', $cache ) ) {
    warn "Thumbnail.pm: $! opening $cache\n";
}
else {
    local $/;
    binmode $fh;
    print <$fh>;
};