Newsgroups: comp.lang.perl
Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!wuarchive!psuvax1!news
From: flee@cs.psu.edu (Felix Lee)
Subject: Re: Self-reproducing program
Message-ID: <i83Gdyia1@cs.psu.edu>
Sender: news@cs.psu.edu (Usenet)
Nntp-Posting-Host: dictionopolis.cs.psu.edu
Organization: Penn State Computer Science
References: <1991Mar26.210348.12286@uvaarpa.Virginia.EDU>
	<.c5G=2v91@cs.psu.edu> <1991Mar27.172212.18930@iwarp.intel.com>
Date: Wed, 27 Mar 91 21:48:15 GMT
Lines: 10

Why does
	perl -e 'seek(DATA,0,0);print<DATA>__END__'
emit a newline?

Bonus question.  Why doesn't this do the same thing?
	perl -e 'seek(DATA,0,0);print<DATA>^Z'
where ^Z is a control-Z character
--
Felix Lee	flee@cs.psu.edu