perl - List:Gen で範囲を使用して、さまざまな値を反復処理する

Question

List::Genを使用して、要素を持つ配列を反復処理しようとしています:

[0,  5000, 10000, ... 20000]

しかし、次のコードではエラーが発生します

use List::Gen;

my $nsamps = range 0, 5000, 20000;

for( $nsamp ($nsamps) { 
     print $nsamp
 }

エラーは次のとおりです。

$nsamp requires explicit package ...

なんで？

Answer 1

宣言したことはありません$nsamp。

また、迷子になり(ます。

最後に、インデントが不安定です。

修理済み：

for my $nsamp ($nsamps) { 
    print $nsamp;
}

Answer 2

List::Genの範囲関数を使用するには、ステップ サイズを 3 番目の引数として指定します。

use strict;
use warnings;

use feature 'say';
use List::Gen;

my $nsamp = range 0, 20_000, 5_000 ;

say for @$nsamp;  # 0
                  # 5000
                  # 10000
                  # 15000
                  # 20000

# Or, for a faster equivalent

while ( my ( $num ) = $nsamp->() ) {
    say $num;
}