この問題についてなんですがね。 http://search.cpan.org/dist/Perl-Critic/lib/Perl/Critic/Policy/Subroutines/ProhibitReturnSort.pm まあ未定義っつってもどうせリストの要素数返すんだろ! そう思っていた時期が俺にもありました。 試す とりあえずこういうコードを書きます。 use strict; use warnings; sub hoge { my @a = (5, 3, 2, 6, 1); return (sort @a); } use Data::Dumper; warn Dumper +{ list => [hoge()], scalar => scalar(hoge()), }; おもむろに実行します。 $ perl tmp/hoge.pl $VAR1 = { 'list' => [ 1,