Submission #5803180


Source Code Expand

<>;@A=(A..Z);for(1..26){print$A[$t/6],$_ if(($t=index(<>,snuke))>-1)}

Submission Info

Submission Time
Task A - Where's Snuke?
User icu
Language Perl (v5.18.2)
Score 100
Code Size 71 Byte
Status AC
Exec Time 2 ms
Memory 384 KB

Compile Error

Unquoted string "snuke" may clash with future reserved word at ./Main.pl line 1.
./Main.pl syntax OK

Judge Result

Set Name sample all
Score / Max Score 0 / 0 100 / 100
Status
AC × 2
AC × 11
Set Name Test Cases
sample sample-01.txt, sample-02.txt
all sample-01.txt, sample-02.txt, 01-01.txt, 01-02.txt, 01-03.txt, 01-04.txt, 01-05.txt, 01-06.txt, 01-07.txt, sample-01.txt, sample-02.txt
Case Name Status Exec Time Memory
01-01.txt AC 2 ms 384 KB
01-02.txt AC 2 ms 384 KB
01-03.txt AC 2 ms 384 KB
01-04.txt AC 2 ms 384 KB
01-05.txt AC 2 ms 384 KB
01-06.txt AC 2 ms 384 KB
01-07.txt AC 2 ms 384 KB
sample-01.txt AC 2 ms 384 KB
sample-02.txt AC 2 ms 384 KB