in reply to Re^4: Perl's feature to determine, in current point of loop, that this is the last one?
in thread Perl's feature to determine, in current point of loop, that this is the last one?
Yeah, that's doable. I can also think of doing it without having everything inside the loop ..
This produces the output#!/usr/bin/perl use strict; use warnings; # 2022-0125: Handle First and List iems differently that everything # in between .. { my @keys = qw/q w e r t y u i o p/; print "First is $keys[0] ..\n"; foreach my $k ( @keys[1..(scalar @keys -2)] ) { print "In the middle: $k\n"; } print "Finally, we have $keys[-1].\n"; }
But I like your solution of using an Iterator -- then it has the job of handling the 'first' and 'last' issues.First is q .. In the middle: w In the middle: e In the middle: r In the middle: t In the middle: y In the middle: u In the middle: i In the middle: o Finally, we have p.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^6: Perl's feature to determine, in current point of loop, that this is the last one?
by afoken (Chancellor) on Jan 26, 2022 at 15:49 UTC |
In Section
Seekers of Perl Wisdom