Perl5,Perl6で配列の末尾からひとつ前の要素を取り出す

Perlで配列の末尾からひとつ前の要素を取り出すには。

Perl5

#!/usr/bin/env perl

use v5.20;

my @a = ( 'a' .. 'z' );

# 配列の末尾からひとつ前の要素を取り出す
say $a[-2]; #=> 'y'

Perl6

use v6;

my @a = 'a' .. 'z';

# 配列の末尾からひとつ前の要素を取り出す
say @a[*-2]; #=> 'y'

おわりです。

参考や注釈

• Perl 6 Documentation - Operators
• Perl6導入とHello, world! - Qiita
• Pythonでリストの最後(一番後ろ)の値を取得する方法 - Qiita
• PHPで配列の末尾からひとつ前の要素を取り出す - Qiita