Not a perl solution but use a hotlink protection in the .htaccess file, but rather than an image extesntion use .swf, ive used it with images, javascipt (.js) and css (.css)