if ($. == 1){
     chomp($_);
#     $_ =~ s/$_/$_ 1.0/g;
     $_ .= " 1.0\n";  # i.e. $_ = $_ . " 1.0";
    }