亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

  免費注冊 查看新帖 |

Chinaunix

  平臺 論壇 博客 文庫
最近訪問板塊 發(fā)新帖
查看: 4096 | 回復(fù): 7
打印 上一主題 下一主題

求教怎樣將部分相同的行給合并成一行 [復(fù)制鏈接]

論壇徽章:
0
跳轉(zhuǎn)到指定樓層
1 [收藏(0)] [報告]
發(fā)表于 2014-04-24 11:24 |只看該作者 |倒序瀏覽
本帖最后由 chenchenbeyond 于 2014-04-24 11:26 編輯

Dear all:
求教怎么用hash實現(xiàn)以下功能

文件里有以下內(nèi)容
M11   D1  G1  S1  B1  NCH  L=1u  W=1u
M32   D1  G1  S1  B1  NCH  L=1u  W=1u
M23   D1  G1  S1  B1  NCH  L=1u  W=1u
M233   D1  G1  S1  B1  NCH  L=1u  W=1u
M234   D1  G1  S1  B1  NCH  L=1u  W=1u

希望將這些內(nèi)容合并成
M11    D1  G1  S1  B1  NCH  L=1u  W=1u  M=5
即將相同的合并成一個,若有5個相同的行,就在行尾添加一個M=5

謝謝各位

論壇徽章:
0
2 [報告]
發(fā)表于 2014-04-24 11:52 |只看該作者
while(<DATA>)
{
    %hash{$_} ++;
}

for $key keys %hash{
  print $key  $hash{$key};
}

論壇徽章:
3
CU十二周年紀(jì)念徽章
日期:2013-10-24 15:41:34子鼠
日期:2013-12-14 14:57:19射手座
日期:2014-04-25 21:23:23
3 [報告]
發(fā)表于 2014-04-24 12:06 |只看該作者
{:3_186:}月經(jīng)題又來了

論壇徽章:
0
4 [報告]
發(fā)表于 2014-04-24 12:22 |只看該作者
回復(fù) 3# mcshell


    那麻煩指教下

論壇徽章:
8
技術(shù)圖書徽章
日期:2013-09-30 08:51:28技術(shù)圖書徽章
日期:2013-12-11 09:26:39白羊座
日期:2013-12-27 15:27:13金牛座
日期:2014-01-06 09:13:05天蝎座
日期:2014-01-21 14:23:28酉雞
日期:2014-05-09 16:51:12卯兔
日期:2014-08-11 16:49:1515-16賽季CBA聯(lián)賽之八一
日期:2017-08-14 23:24:57
5 [報告]
發(fā)表于 2014-04-24 13:58 |只看該作者
本帖最后由 xiumu2280 于 2014-04-24 14:00 編輯

http://www.72891.cn/forum.p ... ;page=1#pid24164453

M11   D1  G1  S1  B1  NCH  L=1u  W=1u
M32   D1  G1  S1  B1  NCH  L=1u  W=1u
M23   D1  G1  S1  B1  NCH  L=1u  W=1u
M233   D1  G1  S1  B1  NCH  L=1u  W=1u
M234   D1  G1  S1  B1  NCH  L=1u  W=1u

如何合并的····

論壇徽章:
3
CU十二周年紀(jì)念徽章
日期:2013-10-24 15:41:34子鼠
日期:2013-12-14 14:57:19射手座
日期:2014-04-25 21:23:23
6 [報告]
發(fā)表于 2014-04-24 14:13 |只看該作者
本帖最后由 mcshell 于 2014-04-24 14:14 編輯

回復(fù) 4# chenchenbeyond
  1. my ($hash,@str);
  2. while (<DATA>) {
  3.     my @data = split;
  4.     push @str , shift @data;
  5.     pop @str if $hash->{"@data"}++;
  6. }
  7. print shift @str," $_ M=$hash->{$_}\n" for keys %$hash;  

  8. __DATA__
  9. M11   D1  G1  S1  B1  NCH  L=1u  W=1u
  10. M32   D1  G1  S1  B1  NCH  L=1u  W=1u
  11. M23   D1  G1  S1  B1  NCH  L=1u  W=1u
  12. M233   D1  G1  S1  B1  NCH  L=1u  W=1u
  13. M234   D1  G1  S1  B1  NCH  L=1u  W=1u
  14. M23   D1  G2  S1  B1  NCH  L=1u  W=1u
  15. M233   D1  G2  S1  B1  NCH  L=1u  W=1u
  16. M234   D1  G2  S1  B1  NCH  L=1u  W=1u
  17. M32   D1  G3  S1  B1  NCH  L=1u  W=1u
  18. M23   D1  G3  S1  B1  NCH  L=1u  W=1u
  19. M233   D1  G3  S1  B1  NCH  L=1u  W=1u
復(fù)制代碼
{:3_183:}
   

論壇徽章:
0
7 [報告]
發(fā)表于 2014-04-24 14:29 |只看該作者
這問題也不難

論壇徽章:
0
8 [報告]
發(fā)表于 2014-04-24 14:32 |只看該作者
你至少應(yīng)該弄一個測試文件上來,不是嗎?
您需要登錄后才可以回帖 登錄 | 注冊

本版積分規(guī)則 發(fā)表回復(fù)

  

北京盛拓優(yōu)訊信息技術(shù)有限公司. 版權(quán)所有 京ICP備16024965號-6 北京市公安局海淀分局網(wǎng)監(jiān)中心備案編號:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年舉報專區(qū)
中國互聯(lián)網(wǎng)協(xié)會會員  聯(lián)系我們:huangweiwei@itpub.net
感謝所有關(guān)心和支持過ChinaUnix的朋友們 轉(zhuǎn)載本站內(nèi)容請注明原作者名及出處

清除 Cookies - ChinaUnix - Archiver - WAP - TOP