Re: [請益] 關於寫入txt檔

看板Perl作者 (龜小C)時間13年前 (2011/07/11 14:09), 編輯推噓0(004)
留言4則, 3人參與, 最新討論串2/2 (看更多)
※ 引述《h781005 (龜小C)》之銘言: : 想請問各位高手 : 小弟我現在如果想要請使用者將資料輸入後 : 寫入txt檔裡面存放 : 但是又不想要在執行第二次時把第一次的資料覆蓋掉 : 要怎麼做修改 : 以下是我的code : #!/usr/bin/perl -w : my %tel; : print "Enter name:"; : my $input = <>; : print "Enter number:"; : my $number = <>; : $tel{$input} = $number; : open FILE, ">telephone2.txt"; : for (keys %tel) { : print FILE "$_$tel{$_}\n"; : } : close FILE; : 先在此感謝各位!! 再問一個問題... 假設我現在輸入之後想要讀取檔案中所有資料 我照著網路上的打 #!/usr/bin/perl -w open FILE, "telephone.txt" or die "開啟檔案失敗: $!"; while () { print $_; } close FILE; 結果出現一個問題 Use of uninitialized value in print at xx.pl line 8 請問這樣要怎麼做修改阿? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 61.230.4.155

07/11 14:14, , 1F
while (<FILE>) { 你該去google一下/看看manual了
07/11 14:14, 1F

07/11 14:17, , 2F
哦哦 因為我目前都是上網看perl book那個網站...
07/11 14:17, 2F

07/11 14:18, , 3F
大部分都還是照上面的打...總之!!很感謝k大!
07/11 14:18, 3F

07/16 12:18, , 4F
如果是 stdin 的話 直接 while (<>) { print; } 就好:)
07/16 12:18, 4F
文章代碼(AID): #1E6fElgT (Perl)
討論串 (同標題文章)
文章代碼(AID): #1E6fElgT (Perl)