Submission #3663546

Source Code Expand

$~=z;print~~grep$~ge$_&&($~=$_),<>=~/./g

Submission Info

Submission Time
Task D - Concatenation
User x20
Language Perl (v5.18.2)
Score 300
Code Size 40 Byte
Status AC
Exec Time 60 ms
Memory 9088 KB

Compile Error

Unquoted string "z" 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 300 / 300
Status
AC × 3
AC × 30
Set Name Test Cases
Sample s1.txt, s2.txt, s3.txt
All 01.txt, 02.txt, 03.txt, 04.txt, 05.txt, 06.txt, 07.txt, 08.txt, 09.txt, 10.txt, 11.txt, 12.txt, 13.txt, 14.txt, 15.txt, 16.txt, 17.txt, 18.txt, 19.txt, 20.txt, 21.txt, 22.txt, 23.txt, 24.txt, 25.txt, 26.txt, 27.txt, s1.txt, s2.txt, s3.txt
Case Name Status Exec Time Memory
01.txt AC 2 ms 512 KB
02.txt AC 2 ms 384 KB
03.txt AC 41 ms 9088 KB
04.txt AC 40 ms 9088 KB
05.txt AC 2 ms 384 KB
06.txt AC 2 ms 384 KB
07.txt AC 2 ms 384 KB
08.txt AC 2 ms 384 KB
09.txt AC 2 ms 384 KB
10.txt AC 2 ms 384 KB
11.txt AC 39 ms 8576 KB
12.txt AC 37 ms 8320 KB
13.txt AC 40 ms 8960 KB
14.txt AC 40 ms 9088 KB
15.txt AC 37 ms 8448 KB
16.txt AC 41 ms 8704 KB
17.txt AC 43 ms 9088 KB
18.txt AC 40 ms 8448 KB
19.txt AC 42 ms 8704 KB
20.txt AC 40 ms 8576 KB
21.txt AC 59 ms 8704 KB
22.txt AC 60 ms 8832 KB
23.txt AC 59 ms 8704 KB
24.txt AC 38 ms 7168 KB
25.txt AC 38 ms 7168 KB
26.txt AC 37 ms 7168 KB
27.txt AC 38 ms 7168 KB
s1.txt AC 2 ms 384 KB
s2.txt AC 2 ms 384 KB
s3.txt AC 2 ms 384 KB