看板 [ Perl ]
討論串[問題] 關於字串
共 7 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
2
下一頁
尾頁
#7
[問題] 關於字串
推噓2(2推 0噓 0→)留言2則，0人參與, 最新作者bounty5254 (AM2)時間13年前 (2011/10/27 16:27), 編輯資訊
0
0
0
內容預覽:
請教一下該怎樣把一個字串中的某個字元取代掉. 比如說. $a = XXXXXXXXXXXXXXX;. 要把$a中的第十個bit取代成A之類的. --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 180.217.139.154.
#6
Re: [問題] 關於字串
推噓1(1推 0噓 0→)留言1則，0人參與, 最新作者sqrt1089 (李崩子)時間14年前 (2010/09/28 15:49), 編輯資訊
0
0
0
內容預覽:
自己回文. my %last_name=qw{. lee David. wang steve. lee eric. wu hunry. };. chomp(my $name=<>);. print"$name $last_name{$name}.\n ";. 結果:. 輸入lee，印出David(沒
(還有93個字)
#5
Re: [問題] 關於字串
推噓3(3推 0噓 1→)留言4則，0人參與, 最新作者dryman (dryman)時間14年前 (2010/09/28 09:45), 編輯資訊
0
0
0
內容預覽:
map{split; push @{ $hash{$_[0]} }, $_[1]} <DATA>;. use Data::Dumper; warn Dumper( \%hash );. ==================. $VAR1 = {. 'wu' => [. 'hunry'. ],. 'w
#4
Re: [問題] 關於字串
推噓2(2推 0噓 4→)留言6則，0人參與, 最新作者kornelius (c9s)時間14年前 (2010/09/28 01:35), 編輯資訊
0
0
0
內容預覽:
短些的。 :). my %hash = map { chomp; split } <DATA>;. use Data::Dumper; warn Dumper( \%hash );. __DATA__. 213 abc. bb cc. --. qr{Cornelius|c9s};. --. ※ 發信
#3
Re: [問題] 關於字串
推噓2(2推 0噓 5→)留言7則，0人參與, 最新作者dryman (dryman)時間14年前 (2010/09/27 23:52), 編輯資訊
0
0
0
內容預覽:
概念很簡單：弄一個hash of arrays. 要把hash value當成array，只要用@{$my_hash{key}}就可以了. 所以strs的第一個值就當key，第二個值推入array中. #!/usr/bin/perl. while(<>){. @strs=split;. push @
首頁
上一頁
1
2
下一頁
尾頁