Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Perl write and read on same file
Top Forums Shell Programming and Scripting Perl write and read on same file Post 302845675 by rajamadhavan on Thursday 22nd of August 2013 04:30:26 AM
Old 08-22-2013
The best option for such requirement is Tie::File

In anyway, you need to seek to the beginning of the file before reading it again.

Code:
#! /usr/bin/perl -w

open FH, "+< testfile" or die "$@";
print FH  "New content added\n";
# Move Curser to start
seek(FH,0,0);
while (my $line = <FH>) {
    print "$line";
}
# Move it to END
seek(FH,0,2);
close(FH);

This User Gave Thanks to rajamadhavan For This Post:
royalibrahim
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

read and write from a file

I have tried to show the file name whose size is greater than 200 byte in current directory. Please help me. ls -l | tr -s " " " " | cut -f 5,9 -d " " >out.txt #set -a x `cat out.txt` i=0 `cat out.txt` | while do read x echo $x #re=200 j=0 if }" < "200" ] then echo $j j=`expr $j... (2 Replies)
Discussion started by: rinku
2 Replies

2. Shell Programming and Scripting

perl -write values in a file to @array in perl

Hi can anyone suggest me how to write a file containing values,... say 19 20 21 22 .. 40 to an array @array = (19, 20, ... 40) -- Thanks (27 Replies)
Discussion started by: meghana
27 Replies

3. Shell Programming and Scripting

perl read and write to conf file

Hi Everyone, There is a perl file: a.pl ============ #!/usr/bin/perl my $config_file = $ARGV; open CONFIG, "$config_file" or die "Program stopping, couldn't open the configuration file '$config_file'.\n"; my $config = join "", <CONFIG>; close CONFIG; eval $config; die "Couldn't... (1 Reply)
Discussion started by: jimmy_y
1 Replies

4. IP Networking

read/write,write/write lock with smbclient fails

Hi, We have smb client running on two of the linux boxes and smb server on another linux system. During a backup operation which uses smb, read of a file was allowed while write to the same file was going on.Also simultaneous writes to the same file were allowed.Following are the settings in the... (1 Reply)
Discussion started by: swatidas11
1 Replies

5. Shell Programming and Scripting

perl script to check read/write/execute permission for 'others'

I want to check access rights permissions not for 'user', not for 'group', but for 'others'. I want to do it by system command in which i want to use 'ls -l' and 'awk' command. I have written the following program : #!/usr/bin/local/perl #include <stdlib.h> system ("ls -l | awk... (1 Reply)
Discussion started by: shubhamsachdeva
1 Replies

6. Shell Programming and Scripting

File Read and Write

I have got a file in following format: AAAAAAA BBBBBBBB CCCCCCC DDDDDDD I am trying to read this file and out put it in following format: AAAAAAA,BBBBBBB,CCCCCCC,DDDDDD Preferred method is shell or Perl. Any help appreciated. (11 Replies)
Discussion started by: Araoki
11 Replies

7. Shell Programming and Scripting

Read and write in the file

Hello Guys, How all are doing? I have an issue in Unix and want help from all of you I have a file in UNIX which it read by line by line , If at the end of line '0' is written the it should fetch that line into another file and change '0' to '1' and If at the end of line '1' is written then it... (10 Replies)
Discussion started by: adisky123
10 Replies

8. Shell Programming and Scripting

Need a perl script to read and write the data

Hi, I have on Designdocument in that information is stored with in tabular format.I need Perlscript to read and write the datausing perl script? Regards, Ravi (0 Replies)
Discussion started by: toravi.pentaho
0 Replies

9. Shell Programming and Scripting

Need a UNIX/perl script to read and write the data

Hi, I have on Designdocument in that information is stored with in tabular format.I need Perl/unix script to read and write the data using perl script? Regards, Ravi (4 Replies)
Discussion started by: toravi.pentaho
4 Replies

10. Shell Programming and Scripting

Read/write perl file

Hi I am trying to build a web form where it can take the input from the user and write it to a file. And when I will open that form again that for should read the file that was created at the 1st step and all the fields should auto populate from that file. I have 20 text fields in my form. I... (1 Reply)
Discussion started by: sauravrout
1 Replies

LEARN ABOUT DEBIAN

config::model::backend::debian::dpkg::patch

Config::Model::Backend::Debian::Dpkg::Patch(3pm)	User Contributed Perl Documentation	  Config::Model::Backend::Debian::Dpkg::Patch(3pm)

NAME

       Config::Model::Backend::Debian::Dpkg::Patch - Read and write Debian Dpkg Patch information

VERSION

       version 2.021

SYNOPSIS

       No synopsis. This class is dedicated to configuration class "Debian::Dpkg::Patch"

DESCRIPTION

       This module is used directly by Config::Model to read or write the content of Debian "Patch" file.

       All "Patch" files keyword are read in a case-insensitive manner.

CONSTRUCTOR

   new ( node => $node_obj, name => 'Debian::Dpkg::Patch' ) ;
       Inherited from Config::Model::Backend::Any. The constructor will be called by Config::Model::AutoRead.

   read ( io_handle => ... )
       Of all parameters passed to this read call-back, only "io_handle" is used. This parameter must be IO::File object already opened for read.

       It can also be undef. In this case, "read()" will return 0.

       When a file is read,  "read()" will return 1.

   write ( io_handle => ... )
       Of all parameters passed to this write call-back, only "io_handle" is used. This parameter must be IO::File object already opened for
       write.

       "write()" will return 1.

AUTHOR

       Dominique Dumont, (ddumont at cpan dot org)

SEE ALSO

       Config::Model, Config::Model::AutoRead, Config::Model::Backend::Any,

perl v5.14.2							    2012-11-09			  Config::Model::Backend::Debian::Dpkg::Patch(3pm)
All times are GMT -4. The time now is 06:31 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy