Perl open 函数



  • 描述

    open 此函数使用指定的文件句柄打开文件。文件句柄可以是一个表达式,结果值用作句柄。如果未指定文件名,则该变量的名称与所使用的文件句柄相同(这应该是标量变量,其字符串值引用该文件名)。特殊文件名“-”表示STDIN,“>-”表示STDOUT。
  • 句法

    以下是此函数的简单语法-
    
    open FILEHANDLE, EXPR, LIST
    
    open FILEHANDLE, EXPR
    
    open FILEHANDLE
    
    
  • 返回值

    如果失败,此函数返回o;如果成功,则返回1。
  • 示例

    以下是在只读模式下打开file.txt的语法。此处小于<符号表示必须以只读模式打开文件。
     
    open(DATA, "<file.txt");
    
    
    DATA是将用于读取文件的文件句柄。这是打开文件并在屏幕上打印其内容的示例。
     
    open(DATA, "<file.txt");
    
    while(<DATA>) {
       print "$_";
    }
    
    
    以下是在写入模式下打开file.txt的语法。此处小于>符号表示必须以写入模式打开文件-
     
    open(DATA, ">file.txt");
    
    
    本示例实际上在打开文件进行写入之前将其截断(清空),这可能不是理想的效果。如果要打开文件进行读写,可以在>或<字符前加一个加号。
    例如,打开文件进行更新而不截断-
     
    open(DATA, "+<file.txt");
    
    
    首先截断文件-
     
    open DATA, "+>file.txt" or die "Couldn't open file file.txt, $!";
    
    
    您可以在追加模式下打开文件。在这种模式下,写入点将设置在文件末尾。
     
    open(DATA,">>file.txt") || die "Couldn't open file file.txt, $!";
    
    
    >> 将打开要附加的文件,将文件指针放在末尾,以便您可以立即开始附加信息。但是,除非您在其前面加上加号,否则您将无法读取它-
     
    open(DATA,"+>>file.txt") || die "Couldn't open file file.txt, $!";
    
    
    下表列出了不同模式的可能值。
     
    模式      定义
    < or r    只读访问
    > or w    创建,写入和截断
    >> or a         编写,附加和创建
    +< or r+       读写
    +> or w+       读取,写入,创建和截断
    +>> or a+    读取,写入,附加和创建