IDL编程语言的代码，打开文件、读文件、写文件

pro read_write_file, filename, output_filename

    ;打开输入文件
    openr, 1, filename, /get_lun

    ;读取文件内容
    content = ''
    while(not eof(1)) do begin
        line = ''
        readf, 1, line
        content = strjoin([content, line], /newline)
    endwhile

    ;关闭输入文件
    close, 1

    ;打开输出文件
    openw, 2, output_filename, /get_lun

    ;写入文件内容
    printf, 2, content

    ;关闭输出文件
    close, 2

end

在这个程序中，openr和openw分别用于打开输入文件和输出文件，readf用于从输入文件中读取每一行的内容，printf用于将内容写入输出文件中，close用于关闭文件。