No order? Try ordering then. :) sub myorder { $a cmp $b } my $lastkey = pop @{[sort { myorder } keys %hash]}; Hmm, S.T. again.... -Hao ===== Want to unsubscribe from this list? ===== Send mail with body "unsubscribe" to macperl-request@macperl.org