RE: very simple question ...but I am at a lost

[Ky-Anh Phan]

> while (<fp_input>){
>     (date,  time,  messageID,  action,  host)= split(/\s+/, $_);

$RECORDS{$messageID} = { DATE => $date, TIME => $time, ACTION => $action,
HOST => $host};

> }

# values of RECORDS hash is a hash reference
# to access corresponding field ..

foreach $id (keys %RECORDS)
{
        print $RECORDS{$id}->{TIME};
}

_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin