06/01/17 02:50:39
>>423
while (<$fh>) {
chomp;
my($date, $mail) = split /,/;
$mails{$mail} = $date;
}
後は自分で何とかしろ。
06/01/17 02:50:39
>>423
while (<$fh>) {
chomp;
my($date, $mail) = split /,/;
$mails{$mail} = $date;
}
後は自分で何とかしろ。
06/01/17 02:50:39
>>423
while (<$fh>) {
chomp;
my($date, $mail) = split /,/;
$mails{$mail} = $date;
}
後は自分で何とかしろ。