$tmp[5] = "BCInletTemperature = 90[C]"; print "$tmp[5] xx\n"; $temp = $tmp[5] =~ m{ = \s+ ($RE{num}{real}) \[ }xms; print "xxx $temp xxx\n";