Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw

Re: Forcing array context on a file handle

by fishmonger (Chaplain)
on Oct 30, 2012 at 21:11 UTC ( #1001557=note: print w/replies, xml ) Need Help??

in reply to Forcing array context on a file handle

Did you check perldoc? This is a FAQ

perldoc -q "How do I count the number of lines in a file"

  • Comment on Re: Forcing array context on a file handle

Replies are listed 'Best First'.
Re^2: Forcing array context on a file handle
by perl_walker (Novice) on Oct 31, 2012 at 07:15 UTC

    Hi, ronmrdechai

    $lines = grep {$_} <$file>;
      That works for files in the default case, because every line will have a newline or somesuch, and will not be an empty string. For counting, map would be more appropriate than grep. But tobyink showed the idiom above:
      my $lines =()= <$file>;

      Quantum Mechanics: The dreams stuff is made of

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1001557]
[Eily]: there are some special array variables that are not interpolated in double strings, like @*, @/, @(, and @)
[Eily]: is this documented somwhere?
[Eily]: "@{/}" does interpolate @/ though
[Eily]: (while the same for @*, @(, and @) throw a warning)
[talexb]: TStanley Cool. Yeah, that's about 45 minutes away. Nice spot.

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (14)
As of 2017-06-23 14:01 GMT
Find Nodes?
    Voting Booth?
    How many monitors do you use while coding?

    Results (548 votes). Check out past polls.