use utf8しても全角記号は使えない

らしい。

日本語Perl第２課

確かに失敗する。

use utf8;

my $数１ = 0;
sub 数１に入れる→ {
  $数１ = $_[0];
}
sub 改行 { "\n" }


my $数２ = 6;

数１に入れる→ $数２;

print $数１, 改行;

Illegal declaration of subroutine main::数１に入れる at te.pl line 4.

記号じゃなければいける。

use utf8;

my $数１ = 0;
sub 数１に入れるで {
  $数１ = $_[0];
}
sub 改行 { "\n" }


my $数２ = 6;

数１に入れるで $数２;

print $数１, 改行;

6

まぁ使わないけれど。