my @m = a..z;
my $i = 0; #must be on the right side
print @m[$i++,$i++,$i++,$i++,$i];