[問題] push&換行

看板Perl作者 (李崩子)時間13年前 (2010/10/06 22:57), 編輯推噓3(307)
留言10則, 4人參與, 最新討論串1/1
我有個push在while裡面, EX: $c=","; while(<>){ ... .. . push @array,$a[0],$c,$a[1]; } print @array; 假設我的$a[0]是英文大寫好了,$a[1]是小寫; 最後會印出A,a B,b C,c.... 中間的逗號是$c來的。 但是我想要的結果是: A,a B,b C,c 是要加什麼指令? 我令$d="\n" or 用正規的$d=/\n/; 擺在push @array,$a[0],$c,$a[1],$d;也不能~"~ 或是我在print "@array \n";也不能。 到底要怎改?@~@ -- -- ▂▂ ▂▂▂ ▂▄▅▅▄▆█ _█◣ ◢ (●) ◣/\\ 丫 │◥  ̄◤ -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.116.215.116

10/06 22:58, , 1F
忘了備註 我搜索過/push 跟/換行
10/06 22:58, 1F

10/06 23:12, , 2F
push(@array,"$a[0],$a[1]\n"); #這樣嗎?
10/06 23:12, 2F

10/06 23:24, , 3F
原 po 在 while 中的 push 寫法會導致 $a[0]、$c、$[1] 成
10/06 23:24, 3F

10/06 23:25, , 4F
為三個陣列元素,而不是原 po 想要的一個元素
10/06 23:25, 4F

10/06 23:26, , 5F
不能,剛去try了。不過你這樣可以讓$b(,)用不到!
10/06 23:26, 5F

10/06 23:27, , 6F
用 for (0..$#array){print $array[$_],"\n";} 去看就知道
10/06 23:27, 6F

10/06 23:27, , 7F
問題出在這了
10/06 23:27, 7F

10/07 01:14, , 8F
push @array,$a[0].$c.$a[1]; $,=$/; print @array ;
10/07 01:14, 8F

10/07 15:05, , 9F
....自我解答,因為我是網頁板的所以要加<br>...
10/07 15:05, 9F

10/07 15:05, , 10F
push(@array,"$a[0],$a[1] <br>");
10/07 15:05, 10F
文章代碼(AID): #1Ch8vZhk (Perl)