# それぞれを整理整頓
# otakaraから
my %DUP_Hash;
@Otakara =
sort # そっとソート
map { $_->[0] . "¥n" } # 元に戻す。
grep { not $DUP_Hash{$_->[1]}++ } # 重複を排除。　←これとか
grep { time < $_->[2] } # 時間切れを排除。
map { [$_, split /<>/] } # リファレンスに。
@Otakara;

これがいかんのだろうなぁ。。。@Hack72_Cron.pl

♯be.2ch.netが止まったる？