Re: [MacPerl] Deleting from a hash of hashes

[Ronald J Kimball <rjk@linguist.dartmouth.edu>]

On Thu, May 20, 1999 at 11:37:52PM -0400, David Wadson wrote:
> foreach $key ( keys %HOH)
>    {
>       if ( $HoH{$key}{DISPLAY_TIME} > $CURRENT_TIME )
>          {
>             delete $HoH{$key};
>          }
>    }
> 
> 
> $key represents a numerical list of keys and its corresponding values is
> another hash of which "EXPIRY_TIME" is one of the keys. I'm able to do
> everything else I want to do expect delete entries. Both EXPIRY_TIME and
> CURRENT_TIME are in Epoch seconds but no matter what, when I run the script
> no listings get deleted even when their DISPLAY_TIME (i.e. the first day
> they should appear) is greater than CURRENT_TIME (the current day).

Is it DISPLAY_TIME or EXPIRY_TIME?

Ronald

===== Want to unsubscribe from this list?
===== Send mail with body "unsubscribe" to macperl-request@macperl.org