看板
[ Perl ]
討論串[問題] 讀取檔案的內容
共 10 篇文章
內容預覽:
大家好. 小弟最近在用perl去讀取檔案並取值. 檔案的內容是這樣. 0 1. 0 2. 0 3. 0 4. 1 1. 0 2. 2 3. 1 4. 0 1. 1 2. 右邊的1、2、3、4是代號. 左邊的數字則是得到的資料. 我的程式是將1、2、3、4的資料統計出來. 例如說0有幾個,1有幾個,2
(還有528個字)
內容預覽:
use Data::Dumper ;. my %count_of_si ; #統計si出現的次數. my %p_of_si ; #統計si為0的次數. my $raw_read_in ;. while($raw_read_in = <>){. #樣式比對 把該行內首先出現的,被space or ta
(還有466個字)
內容預覽:
我試了一下,$raw_read_in是指讀入的檔案的變數吧?. 所以我改成這樣. -------. use strict;. use Data::Dumper ;. my %count_of_si ; #統計si出現的次數. my %p_of_si ; #統計si為0的次數. my $raw_rea
(還有596個字)
內容預覽:
不是喔 原先的用意是放置讀入的檔案的每一行內容的地方. 以下行首不為':' 的行就是我有修改的. my $name_of_file_in = "aaa_inc"; #讀入的檔案. if (-e $name_of_file_in) print "$name_of_file_in exist\n";.
(還有89個字)
內容預覽:
這裡我有key錯 是原本的 $count_of_si{ $filtered[1] }++; 才對. 我試了一下. 發現show出的內容是. $var1 = 7. $var2 = 7. $var3 = 7. $var1 = 6. $var2 = 7. $var3 = 2. 上行表示1、2、3全部的個數
(還有91個字)