print TOFILE
      map {s/^update_info=(?:\w+)/update_info=auto/; $_ } 
      <FILE>;