version 1.301, 2005/10/17 20:09:01
|
version 1.302, 2005/12/09 20:54:23
|
Line 3594 sub dump_dcmail_handler {
|
Line 3594 sub dump_dcmail_handler {
|
if ($hashref) { |
if ($hashref) { |
while (my ($key,$value) = each(%$hashref)) { |
while (my ($key,$value) = each(%$hashref)) { |
my $match = 1; |
my $match = 1; |
|
$key = &unescape($key); |
my ($timestamp,$subj,$uname,$udom) = split(/:/,&unescape($key),5); |
my ($timestamp,$subj,$uname,$udom) = split(/:/,&unescape($key),5); |
$timestamp = &unescape($timestamp); |
$timestamp = &unescape($timestamp); |
$subj = &unescape($subj); |
$subj = &unescape($subj); |