"John W. Krahn" wrote: > > The initial value in $name{$File::Find::name} will be undef not zero so > comparing it to zero will not work. > > if ( $name{ $File::Find::name }++ ) {
Sorry, my mistake, it does work. John -- use Perl; program fulfillment -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]