perl - スカラー値へのカウント

Question

だから私はforeachループを持っています:

foreach (1..10) {
    print "#", $t, "\n";
 }

しかし、私はスカラーも持っています:

$number = 5;

このように 1 からスカラーまで数えることはできますか?

 foreach (1..$number) {
    print "#", $t, "\n";
 }

これを行うと、プログラムは単に何も出力しません。これを機能させるにはどうすればよいですか？

Answer 1

脚本：

#!/usr/bin/perl

use strict;
use warnings;

my $number = 5;

foreach (1..$number) {
  print "#$_\n";
}

また

#!/usr/bin/perl

use strict;
use warnings;

my $number = 5;

print "#$_\n" for 1..$number;

出力：

#1
#2
#3
#4
#5