Submission #899028


Source Code Expand

($_,$K)=<>;s/[b-z]/$K<($t=123-ord$&)?$&:($K-=$t,a)/ge;s/.$/chr$K%26+ord$&/e;print

Submission Info

Submission Time
Task C - Next Letter
User x20
Language Perl (v5.18.2)
Score 400
Code Size 81 Byte
Status AC
Exec Time 74 ms
Memory 10240 KB

Compile Error

Unquoted string "a" 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 400 / 400
Status
AC × 3
AC × 27
Set Name Test Cases
Sample 0_00.txt, 0_01.txt, 0_02.txt
All 0_00.txt, 0_01.txt, 0_02.txt, 1_00.txt, 1_01.txt, 1_02.txt, 1_03.txt, 1_04.txt, 1_05.txt, 1_06.txt, 1_07.txt, 1_08.txt, 1_09.txt, 1_10.txt, 1_11.txt, 1_12.txt, 1_13.txt, 1_14.txt, 1_15.txt, 1_16.txt, 1_17.txt, 1_18.txt, 1_19.txt, 1_20.txt, 1_21.txt, 1_22.txt, 1_23.txt
Case Name Status Exec Time Memory
0_00.txt AC 4 ms 384 KB
0_01.txt AC 4 ms 384 KB
0_02.txt AC 4 ms 384 KB
1_00.txt AC 4 ms 384 KB
1_01.txt AC 4 ms 384 KB
1_02.txt AC 4 ms 384 KB
1_03.txt AC 4 ms 384 KB
1_04.txt AC 4 ms 384 KB
1_05.txt AC 4 ms 384 KB
1_06.txt AC 5 ms 768 KB
1_07.txt AC 48 ms 896 KB
1_08.txt AC 68 ms 8832 KB
1_09.txt AC 66 ms 8832 KB
1_10.txt AC 74 ms 10112 KB
1_11.txt AC 57 ms 6016 KB
1_12.txt AC 71 ms 10240 KB
1_13.txt AC 66 ms 8960 KB
1_14.txt AC 51 ms 1792 KB
1_15.txt AC 46 ms 1536 KB
1_16.txt AC 51 ms 896 KB
1_17.txt AC 46 ms 896 KB
1_18.txt AC 45 ms 896 KB
1_19.txt AC 47 ms 896 KB
1_20.txt AC 41 ms 896 KB
1_21.txt AC 45 ms 896 KB
1_22.txt AC 43 ms 896 KB
1_23.txt AC 45 ms 896 KB