作者cutecpu (可愛中央處理器)
看板perl
標題Re: [問題] 請問取出全部字母與其對應關係的問題~ …
時間Thu Jun 8 02:32:25 2006
#!/usr/bin/perl
%hash=(
a=>['b','c'],
b=>['d'],
c=>['a'],
e=>['a','d'],
f=>['g']
);
print join("\n",@{$hash{a}}),$/;
※ 引述《soniagarden (。Goodnight Moon。)》之銘言:
: 寫程式遇到一個瓶頸想懇請各位板大幫幫忙~ T__T
: 就是我有以下資料,每兩個都是他的對應關係~
: a b
: a c
: b d
: c a
: e a
: e d
: f g
: 要怎麼取出每個不同的字母呢? 就是只計算一次~
: (之前遇到這狀況是用unix直接處理檔案 T_T)
: 而且要怎麼樣才能取得他的對應關係,
: 本來想用hash存,但是比方說a就同時對應到b和c,
: 如果用hash然後value用@的話,取值的時候又有點麻煩,
: 請問各位板大有沒有更好的方法,請教教我~ 感激不盡!!! <(_ _)>
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.63.246.28
推 soniagarden:可是有很多很多筆這樣的對應,無法手動輸入耶~ 06/08 23:54
→ soniagarden:如果用push的話他卻說只能push到@不能是hash element 06/08 23:55
推 LiloHuang:其實是可以PUSH的 push(@{$hash{a}},'x''); 06/09 01:14
→ LiloHuang:不過建議這種建議問題使用Graph or Tree來做比較完整 06/09 01:14