トップ 一覧 検索 ヘルプ RSS ログイン

perl de Heptagon (七角形)の変更点

-      my $n = <%= $n %> + 0;
-      $n = $n > 100 || $n < 2 ? 7 : $n; 
+      my $n = 7;