Re^2: how to read every 10 line from input text file ?


"be consistent"
	PerlMonks

Re^2: how to read every 10 line from input text file ?

by avanta (Beadle)

on Nov 24, 2010 at 03:32 UTC ( #873356=note: print w/replies, xml )

Need Help??

in reply to Re: how to read every 10 line from input text file ?
in thread how to read every 10 line from input text file ?

"toolic" code will make it sleep at 10th line but if u need to read every 10th line following is the modified code

open (FILE,"file.txt");
while (my $data = <FILE>) {
  if($. % 10 ==0)
  {
    chomp($data);
    print ("$data\n");
    sleep 60;
  }
}
close(FILE);
[download]

Thanks
AvantA

Comment on Re^2: how to read every 10 line from input text file ? Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://873356]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others avoiding work at the Monastery: (4)

As of 2023-03-26 02:38 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?