看板 [ Perl ]
討論串[問題] 分割檔案問題
共 2 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#1
[問題] 分割檔案問題
推噓0(0推 0噓 1→)留言1則，0人參與, 最新作者windguide (夜很深)時間11年前 (2014/06/10 16:33), 11年前編輯資訊
1
0
1
內容預覽:
各位好. 我有一個檔案想要拆成數個檔案，格式如下. A 5 Alan, Jane group1. A 5 Jack, Susan group2. D 5 Mary, group5. B 2 Tom group3. C 2 Dennis, Amy group4. ... 8 .... ... 8 ..
(還有224個字)
#2
Re: [問題] 分割檔案問題
推噓1(1推 0噓 2→)留言3則，0人參與, 最新作者xatier (陪在妳身邊 :))時間11年前 (2014/06/10 21:38), 編輯資訊
0
0
1
內容預覽:
#!/usr/bin/env perl. use 5.014;. while (<>) {. $_ =~ /^(.*)\s+(\d+)(.*)$/;. my $count = $2;. open FD, ">>", "output-$count.txt";. print FD;. close FD;
首頁
上一頁
1
下一頁
尾頁