perl truncate()函數

perl truncate()函數例子，truncate()函數實例代碼 - 截斷（減少）FILEHANDLE到指定的長度（以字節為單位）指定的文件的大小。

語法

truncate FILEHANDLE, LENGTH

定義和用法

截斷（減少）FILEHANDLE到指定的長度（以字節為單位）指定的文件的大小。如果您的係統上未實現的功能，會產生一個致命的錯誤。

返回值

• undef - 如果操作失敗

• 1 - 成功

例子

下麵的例子將截斷零長度文件“test.txt”。

#!/usr/bin/perl -w
#by www.gitbook.net
open( FILE, "</tmp/test.txt" ) || die "Enable to open test file";

truncate( FILE, 0 );

close(FILE);