Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

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]
[Discipulus]: good night monks!
[shmem]: LanX: oh... now I have to figure out if this is good or bad news.
LanX bad day monks ?
[LanX]: hope you find sleep
[shmem]: LanX: which one?
[LanX]: the last
Discipulus yes a very bad day
[shmem]: grandola, vila morena
[shmem]: LanX: ah, that one. You'll get the bug reports also :P
[Discipulus]: upvote me! i'll make pm great again! ;=)

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (6)
As of 2017-04-29 22:43 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (534 votes). Check out past polls.