in reply to Re^3: How to enter a filename in each line
in thread How to enter a filename in each line

Bundle of thanks to JohnGG, I get what I want. I am not best in perl but now trying to learn steadily form people like you. Can you give some clue how i can do this other than on command line. Regards, Imran
  • Comment on Re^4: How to enter a filename in each line

Replies are listed 'Best First'.
Re^5: How to enter a filename in each line
by jwkrahn (Abbot) on Sep 15, 2008 at 05:36 UTC 
    #!/usr/bin/perl
use warnings;
use strict;

$^I = '.BAK';
while ( <> ) {
    s/$/,$ARGV/;
    print;
    }

__END__

    [download]
[reply]
[d/l]

In Section Seekers of Perl Wisdom