open("FILE", "$filename");
binmode FILE;
undef $/;
$image = <FILE>;
binmode STDOUT;
print $image;That should do it, although there's no reason to do this with a static file unless u want to obfuscate it's source. This only makes sense for getting an image from a database. At 09:07 AM 4/18/05 -0400, Chris wrote: >I know I've seen the answer to this question in the past but I can't seem to >find it in the archives or Google. How can I output an image directly from >Perl? I've read about possibly using binmode, but haven't found a working >example. -- REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=-- "...ne cede males" 00000100 _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
