while (<DATA>) {
  if (/(\d+\.\d+)%/) {
    print $` . $1 / 100 . $';
  }
}