Submission #2116874


Source Code Expand

<>=~$";$%++,($s+=$_)<$'||exit print$%for sort{$b-$a}glob<>;print-1

Submission Info

Submission Time
Task A - Credits
User kotatsugame
Language Perl (v5.18.2)
Score 0
Code Size 66 Byte
Status RE
Exec Time 5 ms
Memory 768 KB

Compile Error

Name "main::s" used only once: possible typo at ./Main.pl line 1.
./Main.pl syntax OK

Judge Result

Set Name All
Score / Max Score 0 / 100
Status
WA × 9
RE × 9
Set Name Test Cases
All corner_10, corner_11, corner_12, corner_13, max_14, random_00, random_01, random_02, random_03, random_04, random_05, random_06, random_07, random_08, random_09, sample_00, sample_01, sample_02
Case Name Status Exec Time Memory
corner_10 RE 5 ms 768 KB
corner_11 WA 5 ms 768 KB
corner_12 RE 5 ms 768 KB
corner_13 RE 5 ms 768 KB
max_14 RE 5 ms 768 KB
random_00 WA 5 ms 768 KB
random_01 WA 5 ms 768 KB
random_02 WA 5 ms 768 KB
random_03 WA 5 ms 768 KB
random_04 WA 5 ms 768 KB
random_05 RE 5 ms 768 KB
random_06 RE 5 ms 768 KB
random_07 WA 5 ms 768 KB
random_08 RE 5 ms 768 KB
random_09 WA 5 ms 768 KB
sample_00 RE 5 ms 768 KB
sample_01 WA 5 ms 768 KB
sample_02 RE 5 ms 768 KB