while () { if ($_=~m#\s+(\d+\.\d+)\%(.+)$#) { print $` . " " . $1 / 100 . $2 . "\n"; } } __DATA__ ENSP00000233379 1058 30 1206 1298 96.1% 13 + 96524483 96533474 8992 ENSP00000233379 1058 30 1206 1298 64.3% 13 + 96524483 96533474 8992 ENSP00000233379 1058 30 1206 1298 23.2% 13 + 96524483 96533474 8992