Re: Attempting to update files blanks them instead

2007-05-15 Thread Kent Frazier
That did the trick. I figured it had to be something simple. To my credit, the book had it wrong too. Anyways, thanks for your help. On 5/14/07, Chas Owens <[EMAIL PROTECTED]> wrote: On 5/14/07, Kent Frazier <[EMAIL PROTECTED]> wrote: snip > Can someone with a more honed eye for this code te

Re: [OT] Re: Attempting to update files blanks them instead

2007-05-15 Thread Chas Owens
07 20:53:50 -0700 (PDT) Message-ID: <[EMAIL PROTECTED]> Date: Mon, 14 May 2007 23:53:50 -0400 From: "Chas Owens" <[EMAIL PROTECTED]> To: "Kent Frazier" <[EMAIL PROTECTED]> Subject: Re: Attempting to update files blanks them instead Cc: "Perl Beginners Li

[OT] Re: Attempting to update files blanks them instead

2007-05-15 Thread Dr.Ruud
Hello Chas, All your replies are lately posted twice, and have a strange Newsgroups: header line. Newsgroups: perl.beginners,perl.beginners For example: Message-ID: <[EMAIL PROTECTED]> A diff between the two messages (with the same Message-ID, but with different SMTP ids) shows this: 7c7 <

Re: Attempting to update files blanks them instead

2007-05-14 Thread Chas Owens
On 5/14/07, Kent Frazier <[EMAIL PROTECTED]> wrote: That did the trick. I figured it had to be something simple. To my credit, the book had it wrong too. Anyways, thanks for your help. snip Unfortunately errors creep into all printed works. The following four links are the errata pages for

Re: Attempting to update files blanks them instead

2007-05-14 Thread Chas Owens
On 5/14/07, Kent Frazier <[EMAIL PROTECTED]> wrote: snip Can someone with a more honed eye for this code tell me what I am doing wrong? snip You are never printing anything. Try #!perl -w use strict; $^I = ".bak"; while (<>) { if ( /^#!/ ) { $_ .= "## Copyright (C) 2007 by Kent Fra