2.3　寫入文件

要寫入文件，也可以使用open函數(shù)，只不過符號由<變成了>，這些符號都借鑒自shell。

代碼2-2　ch02/write_file.pl

1 #!/usr/local/bin/perl
2 
3 open my $fh_output, '>', "write_file.txt";
4 print $fh_output "This is an example\n";
5 close $fh_output;
6 
7 exit 0;

最常用的輸出函數(shù)是print，緊跟print的是輸出文件的句柄（即$fh_output），然后是輸出的內(nèi)容。

請注意，>符號的含義與shell命令行中的含義類似，如果文件不存在，Perl會自動創(chuàng)建該文件；如果文件已經(jīng)存在，那么文件的內(nèi)容會被清空，然后等待后續(xù)的print輸入。

代碼2-2的程序運(yùn)行完成以后，會生成一個(gè)文件write_file.txt，里面只有一行內(nèi)容：

This is an example

如果你需要補(bǔ)充內(nèi)容到已經(jīng)存在的文件尾部，那么可以使用>>符號。

如果你需要具有格式的輸出，比如列對齊，或者對有理數(shù)的小數(shù)部分進(jìn)行截?cái)啵敲纯梢允褂胮rintf：

printf "%s is around %.4f\n", "Pi", "3.14159";

上述代碼輸出：

Pi is around 3.1416

printf函數(shù)的參數(shù)包括格式字符串（"%s is around %.4f\n"）和數(shù)據(jù)列表（"Pi", "3.14159"）。在格式字符串中，會有一些以%開頭的格式定義符。定義符的意義如下表2-2所示。

表2-2　格式定義符1

為了更精確地控制輸出格式，我們還可以在%后面增加數(shù)字和正負(fù)號，如表2-3所示。

表2-3　格式定義符2

與print函數(shù)類似，如果在printf后面指定文件句柄，就可以把帶格式的內(nèi)容輸出到文件了。

如果需要輸出%本身，則需要寫兩個(gè)%，即“%%”。