討論串(共6篇) - [問題] 把資料塞進陣列 - 看板Perl

看板 [ Perl ]

討論串[問題] 把資料塞進陣列

共 6 篇文章

排序：最新先 | 最舊先 | 留言數 | 推文總分

內容預覽：開啟 | 關閉 | 只限未讀

首頁

尾頁

Re: [問題] 把資料塞進陣列

推噓0(0推 )留言0則，0人參與作者colderfred (　)時間17年前 (2008/03/19 01:56)資訊

內容預覽:

感謝各位花時間回答的板友們 XD. 我最後做的方式是. 1. 一行一行轉成array做sort. 2. 每一筆array再轉成兩個array (name[$i]、num[$i]). 最後用if判別若name[$i]同名就累加num[$i]. 否則就輸出該筆資料再$i++繼續跑下去. --. ※

Re: [問題] 把資料塞進陣列

推噓0(0推 )留言0則，0人參與作者jlovet ( Q我~)時間17年前 (2008/03/19 00:36)資訊

內容預覽:

作業?!. #!/usr/bin/perl. #Copyright by Gung Shi-Jie. foreach(sort<STDIN>){. @t=split;. if ($t[0] ne $array[$#array]){. push (@array,$t[0]);. push (@sum,

(還有29個字)

Re: [問題] 把資料塞進陣列

推噓0(0推 )留言0則，0人參與作者jlovet ( Q我~)時間17年前 (2008/03/18 22:41)資訊

內容預覽:

#!/usr/bin/perl. foreach(sort<STDIN>){. $t=(split)[0];. push (@array,$t) if ($t ne $array[$#array]);. }. foreach(@array){. print $_,"\n";. }. 先把檔案sort

Re: [問題] 把資料塞進陣列

推噓0(0推 )留言0則，0人參與作者iFEELing (ing)時間17年前 (2008/03/18 20:23)資訊

內容預覽:

直接讀txt的話你的問題就是開檔讀檔還有 REGEX如果同名的不再放入那你的"同名後的數字算出sum"是要怎麼出來?. 看起來如果你的最終是要達成依名稱統計的功能的話. 有很多做法. 第一是放個二維陣列第一維放名稱第二維放數量. 每讀進一行就掃一遍陣列如果第一維中存在名字就把第二維

(還有48個字)

Re: [問題] 把資料塞進陣列

推噓0(0推 )留言1則，0人參與作者imce (蜥蜴)時間17年前 (2008/03/18 16:22)資訊

內容預覽:

open(FILE,"a.txt");. foreach(<FILE>). {. $name = (split)[0];. push(@ARRAY,$name) if (!grep(/$name/,@ARRAY));. }. close(FILE);. print join("\n",@ARRAY)

首頁

尾頁