Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling
 
PerlMonks  

Re: Writing to files

by jbert (Priest)
on Apr 10, 2000 at 19:11 UTC ( #7244=note: print w/replies, xml ) Need Help??


in reply to Writing to files

All the above good advice applies, but one liners are cool:
perl -i -p -e "BEGIN{print 'A new line!\n';}" your files here

Replies are listed 'Best First'.
RE: Re: Writing to files
by chromatic (Archbishop) on Apr 10, 2000 at 21:01 UTC
    I had better luck with this: perl -i -p -e 'print "first line\n" if $. == 1;' data It depends on the particular magic of $., of course.
RE: Re: Writing to files
by btrott (Parson) on Apr 10, 2000 at 20:42 UTC
    Unfortunately, this doesn't work, because the BEGIN occurs before STDOUT is redirected to the output file (the file you're writing to). Plus, in your case, you used single quotes to surround your "\n", so it didn't get interpolated.

    Here's what I get:

    % perl -i -p -e "BEGIN{print 'A new line!\n';}" foo A new line!\n%
    I tried this myself, the other day, but ran into the same problem.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://7244]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (2)
As of 2022-08-17 22:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?