while() { print "$1\t$2\n",if($_ =~ /(t\.min|t\.max)\s*=\s*(.*?);/); } __END__ MML v2.0; import defaultunit; unit conversion on; math top { t.min = 0; t.max = 3600; t.delta = 5;