Geoffrey Young
Mon, 22 Aug 2005 09:11:24 -0700
> - while (my($key, $file) = each %Apache2::Reload::INCS) {
> + foreach my $key (sort { $a cmp $b } keys %Apache2::Reload::INCS) {
> + my $file = $Apache2::Reload::INCS{$key};
I hate each. +1 --Geoff --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]