Help for this page

Select Code to Download


  1. or download this
    @array = (qw/ Fred Mark Joe Mary Paul /);
$offset_value = 0
  2. or download this
    Fred
Mark
Joe
Mary
Paul
  3. or download this
    Paul
Fred
Mark
Joe
Mary
  4. or download this
    my @array=(qw/ Fred Mark Joe Mary Paul /);
my $offset=0;
...
 $offset=($offset>(scalar @array -1)?0:$offset;
 $loop++;
}