Corpsie

Does anyone know a good perl script where i can send variable to it so that it sends back the right image location?

For example, i'll have all my images in the "blahblah" directory.

To display any image, i'll put
src='/cgi-bin/protected.cgi?whateverimage.jpg'

and the cgi program will send back the
/blahblah/whateverimage.jpg so that the browser displays it and people cannot hot link to it?

thanks.