Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re: Re: Printing the last few elements of an array.

by jonnyfolk (Vicar)
on Dec 16, 2002 at 19:42 UTC ( #220311=note: print w/replies, xml ) Need Help??


in reply to Re: Printing the last few elements of an array.
in thread Printing the last few elements of an array.

Thanks dakkar - now I understand! Is there any way I could have phrased that to make the $count mechanism work?
  • Comment on Re: Re: Printing the last few elements of an array.

Replies are listed 'Best First'.
Re: Re: Re: Printing the last few elements of an array.
by dakkar (Hermit) on Dec 19, 2002 at 09:07 UTC
    @record=reverse @record; my @record1; my $count=0; my $line; while (($count<5) && ($line=$record[$count])) { push @record1,$line; $count++ } @record1=reverse @record1; print join ',',@record1;

    The last reverse is to get the elements in the original order.

    Just promise me you won't really use this version, please? ;-)))

    -- 
            dakkar - Mobilis in mobile
    
      I really appreciate this, dakkar - I understand what pain it must have caused you to write that. I do promise not to use it - but it's very useful for me to see how it works! Thank you.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (2)
As of 2022-07-07 06:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?