結果
問題 | No.3010 Print inside /bin |
ユーザー | Lay_ec |
提出日時 | 2015-05-03 23:56:31 |
言語 | Perl (5.38.2) |
結果 |
WA
(最新)
AC
(最初)
|
実行時間 | - |
コード長 | 144 bytes |
コンパイル時間 | 446 ms |
コンパイル使用メモリ | 5,292 KB |
実行使用メモリ | 5,404 KB |
最終ジャッジ日時 | 2023-09-19 05:41:34 |
合計ジャッジ時間 | 1,085 ms |
ジャッジサーバーID (参考情報) |
judge11 / judge14 |
コンパイルメッセージ
Name "main::l" used only once: possible typo at Main.pl line 4. Name "main::r" used only once: possible typo at Main.pl line 4. Main.pl syntax OK
ソースコード
chdir("/bin"); my @file = glob "*"; my @ans = join("\n", @file ); @ans = sort {$l cmp $r} @ans; foreach my $val (@ans){ print $val,"\n"; }