> so, lets do what you asked (i like hashes better anyway :) )
>
> my %hash3, %nothash;
> my $found = 0;
> while( my( $ikey, $ival ) = each( %hash1 ) ) {
> while( my( $jkey, $jval ) = each( %hash2 ) ) {
> if( ( $ikey == $jkey ) and ( $ival == $ikey ) ) {
> $hash3{ $ikey } = $ival;
> $found = 1;
> }
> }
> if( $found == 0 ) {
> %nothash{ $ikey } = $ival;
> $found = 0;
> }
Thanks Shawn, I'm still trying to figure out what you're doing.., but
get this error
when I run the script.
syntax error at test2.pl line 32, near "%nothash{"
syntax error at test2.pl line 35, near "}"
Wernher
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
