note
giulienk
Thank you so much for the simplest, fastest and works like a charm solution ;)<p>Here's the modified line that makes the trick:
<code>
print header(-type => 'image/jpeg',
-Content_length => length $file,
-expires => '+30d',
), $file;
</code>
<P><BR><TT>$|=$_="1g2i1u1l2i4e2n0k",map{print"\7",chop;select$,,$,,$,,$_/7}m{..}g</TT>
188542
188566