blah::status integer:22
   blah::max integer:5
   ...
   
##</code><code>##

if ($array[$i] =~ /.*status.*/) {
     $status = $array1[$i];
     $status =~ s/^.*://;
     }
if ($array[$i] =~ /.*max.*/) {
     $max = $array1[$i];
     $max =~ s/^.*://;
     }
...etc