Re: Need a better way to count input lines


We don't bite newbies here... much
	PerlMonks

Re: Need a better way to count input lines

by japhy (Canon)

on May 07, 2004 at 14:51 UTC ( [id://351472]=note: print w/replies, xml )

Need Help??

in reply to Need a better way to count input lines

You could do:

# while (not eof FILE) { ... }
# or...
until (eof FILE) {
  my (@lines) = map scalar <FILE>, 1 .. 3;
  # work with $lines[0], $lines[1], $lines[2]
}
[download]

You need the scalar there, because you only want to get one line at a time.

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker, who'd like a job (NYC-area)
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;

Comment on Re: Need a better way to count input lines Download Code

Replies are listed 'Best First'.
Re: Re: Need a better way to count input lines by Theo (Priest) on May 07, 2004 at 20:23 UTC
I've never used map before. It looks like @lines ends up with three elements because of the "1 .. 3" range. .oO(Verrry useful) Would the loop work the same if you used `until (eof FILE)` instead of the while? Update: Thanks for the update! -Theo- (so many nodes and so little time ... )	[reply] [d/l]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

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

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others having a coffee break in the Monastery: (3)

As of 2024-04-23 23:42 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found