perl文件操作学习-创新互联

现有文件hello.txt,内容为:"你好'\n' 我是中国人"

目前创新互联公司已为上1000家的企业提供了网站建设、域名、网页空间、网站托管、企业网站设计、徽县网站维护等服务,公司将坚持客户导向、应用为本的策略,正道将秉承"和谐、参与、激情"的文化,与客户和合作伙伴齐心协力一起成长,共同发展。

1,打开文本hello.txt

     #!/usr/bin/perl


     open f,"hello.txt";

   f 为文件句柄,指向打开的文件

2,逐行读取文本hello.txt

     #!/usr/bin/perl

     open f,"< hello.txt";

     while($line=){

         print $line;

      }

      close f;


     结果:你好

                我是中国人

    或者:print ;

    结果:你好

               我是中国人

    <> 为取行操作符

3,向a.txt中写入内容

  #!/usr/bin/perl

   open f,">a.txt";

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

   close f;


   如果a.txt原本有内容,则原内容将会被擦除,a.txt的内容为

                   hello,world


                   see you

4,向a.txt中追加内容

   #!/usr/bin/perl

     open f,">>a.txt";

     print f "thank you\n";

     close f;

     a.txt的内容为


             hello,world

             see you

             thank you



  print 相当于写命令,别丢了语句结尾的 “;"

另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。


新闻名称:perl文件操作学习-创新互联
转载来于:http://ybzwz.com/article/csojec.html