Help for this page

Select Code to Download


  1. or download this
    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/) {
    
  2. or download this
    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.