Help for this page
143: if(my @d = $h->fetchrow_array()) { 144: print STDERR "equip_id: $e_id -> ". $d[0] ." (rep_id = ". $d[1] + .")\n"; 145: if($d[0] eq /NA/) {
equip_id: 5212 -> -NA- (rep_id = 154) Use of uninitialized value in pattern match (m//) at test.pl line 145. equip_id: 1337 -> 4047.3 (rep_id = 152) Use of uninitialized value in pattern match (m//) at test.pl line 145.