Re: weird return

Brent Clark wrote: Brent Clark wrote: Hi list I have my code as so: for my $roomCode ( keys %{ $ref_hash->{$fileName} } ){ my $roomName = $ref_hash->{$fileName}{$roomCode}; if( $pCode eq 'p110'){ if ($p110rm01 eq $roomName ){ $finalHash{$fileName}[0] = $roomName;

Re: weird return

Brent Clark am Mittwoch, 3. August 2005 10.43: > Hi list Hi > I have my code as so: > > for my $roomCode ( keys %{ $ref_hash->{$fileName} } ){ > my $roomName = $ref_hash->{$fileName}{$roomCode}; > if( $pCode eq 'p110'){ > if ($p110rm01 eq $roomName ){ >

Re: weird return

Brent Clark wrote: Hi list I have my code as so: for my $roomCode ( keys %{ $ref_hash->{$fileName} } ){ my $roomName = $ref_hash->{$fileName}{$roomCode}; if( $pCode eq 'p110'){ if ($p110rm01 eq $roomName ){ $finalHash{$fileName}[0] = $roomName; my Data::Dumpe

weird return

Hi list I have my code as so: for my $roomCode ( keys %{ $ref_hash->{$fileName} } ){ my $roomName = $ref_hash->{$fileName}{$roomCode}; if( $pCode eq 'p110'){ if ($p110rm01 eq $roomName ){ $finalHash{$fileName}[0] = $roomName; my