perl -pe 's/(?<!\n)\n# file/\n\n# file/g' record_file