結果
問題 | No.154 市バス |
ユーザー |
![]() |
提出日時 | 2017-03-05 02:50:30 |
言語 | Perl (5.40.0) |
結果 |
AC
|
実行時間 | 738 ms / 2,000 ms |
コード長 | 108 bytes |
コンパイル時間 | 56 ms |
コンパイル使用メモリ | 5,248 KB |
実行使用メモリ | 6,656 KB |
最終ジャッジ日時 | 2024-10-13 09:00:13 |
合計ジャッジ時間 | 5,775 ms |
ジャッジサーバーID (参考情報) |
judge3 / judge5 |
(要ログイン)
ファイルパターン | 結果 |
---|---|
sample | AC * 1 |
other | AC * 8 |
コンパイルメッセージ
Unquoted string "im" may clash with future reserved word at Main.pl line 1. Unquoted string "possible" may clash with future reserved word at Main.pl line 1. Name "main::R" used only once: possible typo at Main.pl line 1. Main.pl syntax OK
ソースコード
<>;map{$W=$G=$R=$|=0;++$$_,$||=/G/?!$W--:/R/&&!$G--for/./g;print$||$G|!/[GR]/|/WR*$|G$/?im:'',possible,$/}<>