Beefy Boxes and Bandwidth Generously Provided by pair Networks
There's more than one way to do things

Re^2: Write to filehandle without deleting current text

by k_manimuthu (Monk)
on Oct 05, 2010 at 12:48 UTC ( #863586=note: print w/replies, xml ) Need Help??

in reply to Re: Write to filehandle without deleting current text
in thread Write to filehandle without deleting current text

When the Read Mode file handler doesn’t to utilize another process you closed the file hander.

Then open the file a file handler in Write Mode with the same file name and print the contents you will the new (updated) contents in the sample file.

#!/usr/bin/perl $fileName = "abc"; open(IN, "<", "$fileName") or die "Could not open file $fileName"; read IN, my $new, -s IN, close (IN); $new =~ s/foo/bar/g; # Open the the file in write mode open(OUT, ">", "$fileName") or die "Could not open file $fileName"; # print the new contents print OUT $new; close (OUT);

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://863586]
[GotToBTru]: okay, fess up, who installed CB::Typo?
[Discipulus]: at 7th floor seagulls eat mice
[Discipulus]: just in Eataly: brain surgery while playing clarinet..
[erix]: installing perfect pitch?

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (13)
As of 2017-11-17 20:14 GMT
Find Nodes?
    Voting Booth?
    In order to be able to say "I know Perl", you must have:

    Results (272 votes). Check out past polls.