[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [MacPerl] Is binmode needed in MacPerl?



At 04:10 PM 9/26/96 -0700, Paul Hoffman wrote:
>Do I need to use binmode(HANDLE) before I do a read on a non-text file in
>MacPerl? I would hope not, but wanted to check...

This is a good question. I was going to do some testing on this over the
weekend to see what sort of results I could get. If somebody already knows
the answer, I'd like to know as well. I'll be testing my luck this weekend
to see if I can make this work... doing something like:

#!perl
open(GIF, ":Images:picture.gif") || die "oops!\n";

print "HTTP/1.0 200 OK";
print "Server: MacHTTP";
print "MIME-Version: 1.0";
print "Content-type: image/gif";

while ($image=<GIF>) {
   print $image;
}
close(GIF);
#END

So, whaddya think? Would this work? What would it take to work? Am I just
dreaming here?

[Daniel]

Daniel Hedrick                                 mailto:daniel@icorp.net
ICorp Web Development                            http://www.icorp.net/
----------------------------------------------------------------------
           *-*-*-*-*-Friday, September 27, 1996-*-*-*-*-*
(1964) Warren Commission finds that Lee Harvey Oswald acted alone 
(1722) BIRTHDAY: Samuel Adams, revolutionary rabble rouser
(1601) BIRTHDAY: Louis XIII, king of France (1610-43)