arrays - Perlで増分値を使用して配列を宣言する

Question

私はこのような配列を宣言することが可能であることを知っています：

my @array = ( 5 .. 10 );

これは次と同等です：

my @array = ( 5, 6, 7, 8, 9, 10 );

しかし、増分値が1より大きい場合、同様の省略形があります。

my @array = ( 5, 10, 15, 20, 25 );
my @array = ( 100, 200, 300, 400, 500 );

Answer 1

my @array = map 5*$_, 1..5;

と

my @array = map 100*$_, 1..5;

Answer 2

より一般的に：

my $start = 5;
my $stop = 25;
my $increment = 5;
my @array = map $start+$increment*$_, 0..($stop-$start)/$increment;

また：

chomp(my @array = `seq $start $increment $stop`);

（冗談だ。）

Answer 3

Damian Conway のList::Makerも使用できます。

use List::Maker;
my @list = <0..100 x 5>;