Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: how can i read only the last line of a files

by perladdict (Chaplain)
on Aug 03, 2006 at 10:03 UTC ( #565416=note: print w/ replies, xml ) Need Help??


in reply to how can i read only the last line of a files

hi monk,
i saw your code,u are reading the content of files in an array.below subroutine may helps to read the last content of arrays.

@last=lastlines(\@a,\@b,\@c); print "@last\n"; sub lastlines { my @retlist=(); foreach my $aref(@_) { push @retlist,pop @$aref; } return @retlist; }
.


Comment on Re: how can i read only the last line of a files
Download Code
Re^2: how can i read only the last line of a files
by davidrw (Prior) on Aug 03, 2006 at 11:57 UTC
    This is equivalent code (though note davorg's reply for a much more robust solution) ... no need to iterate through everything:
    sub lastlines { return map { $_[-1] } @_; } # or, w/o using a sub: @last = ($a[-1], $b[-1], $c[-1]);

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://565416]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (4)
As of 2014-09-21 19:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    How do you remember the number of days in each month?











    Results (175 votes), past polls