Perl - how to skip a line

[SANDY1722]

Hi,

I am new to perl. I want to open a flle with some data and skip the fisrt line, and write to another file.

Source File: source.txt

Data: Bank Acct - Cheking
Balance: $230
Customer: Tom
-------
------

Target File should only contain all the lines, except the first one

target: target.txt

Data: Balance: $230
Customer: Tom
-------
------

Thanks for help on this...

[numberwhun]

Hi,

I am new to perl. I want to open a flle with some data and skip the fisrt line, and write to another file.

Source File: source.txt

Data: Bank Acct - Cheking
Balance: $230
Customer: Tom
-------
------

Target File should only contain all the lines, except the first one

target: target.txt

Data: Balance: $230
Customer: Tom
-------
------

Thanks for help on this...

You have posted your question under Perl Articles instead of the Perl Forum.
I have moved it across for you.

Please post all questions to the Perl Forum in the future!


- MODERATOR

[KevinADC]

open(FH,"yourfile") or die "$!";
readline(FH); #<-- read the first line effectively skipping it
while(<FH>){
   print $_;
}

[SANDY1722]

You have posted your question under Perl Articles instead of the Perl Forum.
I have moved it across for you.

Please post all questions to the Perl Forum in the future!


- MODERATOR

------------------------------------------------------

Thanks a lot