$word =~ s/_/ /g;
                print "ID: $word\n";