結果
問題 | No.164 ちっちゃくないよ!! |
ユーザー |
![]() |
提出日時 | 2017-09-05 06:52:46 |
言語 | Perl (5.38.2) |
結果 |
CE
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 125 bytes |
コンパイル時間 | 35 ms |
コンパイル使用メモリ | 6,688 KB |
最終ジャッジ日時 | 2024-11-14 20:14:40 |
合計ジャッジ時間 | 370 ms |
ジャッジサーバーID (参考情報) |
judge4 / judge1 |
(要ログイン)
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。(リジャッジ後のコンパイルエラーは公開されます)
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
ただし、clay言語の場合は開発者のデバッグのため、公開されます。
コンパイルメッセージ
Unquoted string "f" may clash with future reserved word at Main.pl line 6. Can't use global $_ in "my" at Main.pl line 1, near "my$_" syntax error at Main.pl line 6, near "f sort" Main.pl had compilation errors.
ソースコード
sub f{my$_=pop;/\pL/?-55+ord:$_} <>; for(<>){ $x=0; for(@@=/./g){ ($x*=1+f sort@@)+=f$_ } !$y|$x<$y and$y=$x } print$y