Help for this page

Select Code to Download


  1. or download this
    #/usr/bin/perl
use strict; use warnings; use feature 'say';
...
say join ',', reverse @z;

__END__
  2. or download this
    1,2,3,4,5,6,7,8,9,10
100,99,98,97,96,95,94,93,92,91
  3. or download this
    my @y = @x[ 0 .. 9 ];
my @z = @x[ $#x-9 .. $#x ];