1樓:月輪天唯五
open o, ">1.txt"; #寫入檔名 #生成的檔案 和指令碼在同乙個資料夾下面
$string='hello';
print o $string;
open o, ">e:/1.txt" or die $!; #生成的檔案在e盤,目錄下
$string='hello';
print o $string;
open o, ">>e:/1.txt" or die $!
; #生成的檔案在e盤目錄下,不會刪除原來的檔案,在舊的檔案1.txt #後 面追加內容
$string='hello';
print o $string;
###############################《讀>寫重頭寫
>>追加寫
2樓:匿名使用者
open o, ">1.txt"; #寫入檔名
$string='hello';
print o $string;
perl將乙個值寫入檔案
3樓:匿名使用者
perl將值寫入檔案,參考例項如下:
1、open( my $fh, '>', 'fruit.out' ) or die $!;
print $fh $_ for @output;
2、open (outfile,">>./outfile");
print outfile "$a";
close(outfile);
陣列寫入如下:
#從頭開始寫
open(file,">fruit.txt");
#檔案結尾追加
open(file,">>fruit.txt");
print file "@arr";
4樓:**數碼
open (outfile,">>./outfile");
print outfile "$a";
close(outfile);
如何把perl的輸出結果儲存到乙個txt檔案中 - perl -
5樓:超人影視娛樂
**如下:
#! usr/bin/perl -w
use strict;
use warnings;
open (file,"./a.txt") or die "can't open file:$!";
open (newfile,"./b.txt") or die "can't open file:$!";
while(my $line = )
close file;
close newfile;
6樓:匿名使用者
還用剛才你那個指令碼吧,呵呵[ol][*]#!/usr/bin/perl -w[*][*]open (out,\">print_out.txt\");[*]select out;[*]while()else[*]}[*]select stdout;[*][*][*][*][*]__data__[*]00-50-56-c0-00-08 0100.
0ccc.cccc[/ol]
7樓:匿名使用者
我的手機索愛lt18i,辦理了gprs**,但是程式不能聯網,請問如何在手機上設定gprs引數呢
perl中如何寫檔案
8樓:匿名使用者
perl的讀寫檔案特簡單,就4句話足矣。現在我把每句話給你解釋一下:
①、#!/usr/bin/perl 在命令列打which perl就出來了,是perl的編譯器。
②、open (out,">>","檔案的絕對路徑"); #「>>」:在原檔案上追加,「>」:每次都覆蓋檔案內容
③、print out "需要寫入的內容"; # 5.10之前要用print,之後可以寫say.
④、close out ; # 關不關無所謂,你不關,它也會自動關閉。
9樓:匿名使用者
預設情況下,使用控制代碼讀入檔案,一行一行的讀,當然你可以可以改變檔案分隔符$/,改變讀入方式,寫檔案的方式可以是替換也可以是追加的方式,樓上說的對
10樓:匿名使用者
最簡單的示例
#!/usr/bin/perl
open my $fh,">>","$file_name";
print $fh "需要寫入的內容";
close $fh;
11樓:執火守夜
先open控制代碼
再print控制代碼寫入
12樓:月輪天唯五
open fh,">wenjianming";
print fh "yaoxiede dongxi "
用perl進行檔案讀寫,怎樣寫入資料換行
13樓:翟毅君
讀檔案: open in, "a.txt" or die $!;
寫入檔案 : print in "abc\n";
其中"\n" 就是換行。
perl中如何將陣列中內容存到乙個新建檔案中?
14樓:匿名使用者
$" = "\n";
@arr = (1, 2, 3, 4, 5);
open out, "> a.txt";
print out "@arr";
陣列內插時,分隔符預設$"的值,可以通過修改$"的值來修改如何分割
15樓:
open my $fh, '>' 『test.txt』 or die $!;
for my $data (@array)
16樓:計名
1. use storable;
2. date::dumper
3. for my $each1 (@array)
perl 如何對檔案內容進行新增
17樓:
"我現在有一堆資料" 是怎樣的一堆, 內容是怎樣的格式, 是乙個檔還是多個檔, 多個檔的話檔案都怎樣名命
18樓:tn瓶邪
比如:my $content;
my $file = $curdir."/score.txt";
my $score_type = "chinese";
my $score = 99;
if(!-e $file)
open(file_r,"<$file") or die "cannot open $file\n";
open(file_w,"+<$file") or die "cannot open $file\n";
while()
else
}elsif($score_type eq "chinese")else
}elsif($score_type eq "english")else}}
print file_w $content;
truncate(file_w, tell(file_w));
close(file_r);
close(file_w);
perl 怎樣同時讀寫乙個檔案
19樓:做自己
opendir d,"1" or die $!; #把所有txt檔案都放到乙個叫1的資料夾中@array=grep(/\.txt/,readdir d);foreach $list(@array) }foreach(@new){print...
如何將乙個檔案覆蓋到另乙個檔案上
執行著的話 1,系統檔案,需要重啟到dos才可覆蓋。2,一般檔案,結束程序,del 沒執行的話 1,del,貼上。2,覆蓋。同名的話,直接就覆蓋了啊。不同名的話,把它改為同名就可以覆蓋。同名的話,直接就覆蓋了啊。被覆蓋的檔案就等於刪除了。為什麼不直接刪除?檔案覆蓋?有現在的檔案還用覆蓋舊檔案嗎?de...
如何將乙個二進位制檔案轉化為字串
import import string byte bytes,string charsetname 通過指定的字符集解碼位元組陣列。byte getbytes string charsetname 使用指定的字元集合把字串編碼為位元組陣列。編碼 把看得懂的變成看不懂的。string byte 解碼...
當刪除乙個檔案時出現對話方塊刪除檔案或檔案加時出錯
一般是該檔案正在被使用,如果你必須刪除的話,可以到安全模式下或dos模式下進行。注意安全,有些系統檔案是不能刪除的。1 有程式在呼叫此檔案,結束。2 磁碟處於寫保護狀態,取消。刪除資料夾時出現乙個對話方塊 刪除檔案或資料夾時出錯,訪問被拒絕。有時應系統內部檔案正在使用,可以登出一下當前使用者在進入就...