perl學習筆記 輸入與輸出

2021-10-03 18:41:01 字數 1773 閱讀 7735

注意:

1,<>會處理所有的輸入,直到所有輸入的結尾為止

一般在乙個程式中只有乙個<>,若出現多次則可能發生錯誤。

2,呼叫引數@ar**  @ar** 是乙個裝著呼叫引數的陣列

1,讀取從鍵盤輸入的值

注意 :只讀取鍵盤輸入的一行,到換行符結束 (用chomp去掉換行符)

若沒有賦值給變數,則預設存在$_中

#!usr/bin/perl -w

use strict;

my $name = "linda";

print "$name\n";

print "please input your name :";

chomp (my $name1 = );

print "your name is $name1\n";

2,輸出到標準輸出 print (一般預設為螢幕輸出)

3,段落輸出:

print << "eof";   #遇到「eof」開頭的行才輸出結束  懷疑其實和shell一樣,不一定要是eof這個字元,可以是其他。只要結束是一樣的即可

a :" welcome to ssdd,hehe~"

b:"what do you mean by 'hehe' ?"

eof #eof 開頭,輸出結束

1,用於填補空白的格式化字元;2,要輸出的資料列表

格式字串中可以包含多個轉換,每乙個轉換都以乙個%符號開頭

#以唯讀方式開啟檔案/home/user/text.txt

open in,"close in; #關閉檔案

檔案模式:

< 以唯讀方式開啟(預設)

> 以寫入方式開啟,檔案原有內容會被清空

>> 以追加寫的方式開啟,寫入內容會增加到檔案末尾

open [filehandle],[mode],[filepath];

#以寫入方式開啟檔案/home/user/text.txt  繫結到out控制代碼

open out, '>',"/home/user/text.txt" or die $!;

open out,">/home/user/text.txt" or die $!; 

#寫入內容到/home/user/text.txt中

print out "a test of output test.txt";

close out;#關閉檔案

my $gzfile = "luckystar.txt.gz";

open in,"gzip -dc $gzfile|" or die $!;  # | 管道符

do something~;

close in;

open out,"| gzip -9> $gzfile" or die $!;

do something~;

close out;

my $file ="/home/file.txt";

open in ,"

while (my $line =)

close out;

close in;

Perl語言學習筆記 5 輸入與輸出

1 讀取標準輸入 chomp line 2 判斷是否讀到檔案末尾 defined line 3 讀取檔案內容 while foreach while與foreach的差別 while一次讀取一行,foreach一次讀取全部,然後對列表進行迴圈,最好用while 4 鑽石操作符 根據呼叫引數,從指定地...

perl的輸入與輸出

讀取標準輸入 鍵盤輸入,回車分行,ctrl c截止 例 while foreach 簡單寫法,將輸入處理到結尾,不同的是while是取一行處理一行,foreach是全部取出之後再一行行處理。都是每一行作為一條資料,存在預設變數 中。鑽石操作符 例 while 它可以讀取乙個檔案 一行行讀取 每一行存...

Perl 中的輸入與輸出

1.讀取標準輸入 簡單實用例子 example1 while defined line print here is the input line 如果要結束鍵盤輸入 用ctrl d 2.鑽石操作符 代表行輸入,只不過不是從鍵盤取得輸入 而是從使用者指定的位置讀取。讀入的內容可以在 看到。呼叫引數,鑽...