Perl語言入門--3--檔案讀取與寫入

標籤：開啟   控制代碼   art   txt   寫入   讀取文本   語言   close   bin   

現有檔案test.txt,內容為："123\n456"

1,開啟文本test.txt

      #!/usr/bin/perl

      open d,"test.txt";

    d 為檔案控制代碼，指向開啟的檔案

 

2，逐行讀取文本test.txt

      #!/usr/bin/perl

      open d,"< test.txt";

      while(<d>){

          print $_;

       }

       close d;

      結果：123

               456

     或者：print <d>;

     結果：同上

     <> 為取行操作符

 

3，向test111.txt中寫入內容

   #!/usr/bin/perl

    open d,">test111.txt";

    print f "hello,world\nsee you\n";

    close d;

    如果test111.txt原本有內容，則原內容將會被擦除，test111.txt的內容為

                    hello,world 

                    see you

4,向test111.txt中追加內容

    #!/usr/bin/perl

      open d,">>test111.txt";

      print d "thank you\n";

      close d;

      test111.txt的內容為 

              hello,world

              see you

              thank you

     

   print 相當於寫命令，別丟了語句結尾的 “;"

Perl語言入門--3--檔案讀取與寫入