> - 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]
