require "fileutils"

def SubstituteFirstLine(ff, linedata)

tempfile = open(File.basename(ff, ".mol") + "_FirstLineAsFilename.mol" , "w")
tempfile.write(linedata)

File.open(ff){|f|

f.gets
while line = f.gets
  tempfile.write(line)
end

}

end


fns = Dir.glob("*.mol")
puts "# of mol files " + fns.length.to_s + "."   
puts ""

dir = "OriginalMolData"
Dir.mkdir(dir)  

fns.each{ |fn|

SubstituteFirstLine(fn, File.basename(fn, ".mol") + "\n")
FileUtils.mv(fn, dir + "/" + fn)


}