perl のソートの不具合について

Question

前提

Perlでソートを実行すると、正しくソートされません。なぜでしょうか。

[perl.pl]

my @list_ = (100, 3, 50, 22);
my @sort_ = sort { @a <=> @b } @list_;
print "@list_\n";
print "@sort_\n";

[実行]

$ perl perl.pl
100 3 50 22
100 50 3 22

[実行環境]
Windows10 の、WSL 上で動くLinux(Ubuntu)です

Comments

[melian]

my @sort_ = sort { $a <=> $b } @list_;

とします。

[teefpc]

ありがとうございました。

Answer 1

文法ミスでした。
誤 @a <=> @b
正 $a <=> $b