[問題] push&換行

[sqrt1089 (李崩子)]

我有個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
→ sqrt1089:忘了備註 我搜索過/push 跟/換行
推 imce:push(@array,"$a[0],$a[1]\n"); #這樣嗎？
推 drm343:原 po 在 while 中的 push 寫法會導致 $a[0]、$c、$[1] 成
→ drm343:為三個陣列元素，而不是原 po 想要的一個元素
→ sqrt1089:不能，剛去try了。不過你這樣可以讓$b(,)用不到!
→ drm343:用 for (0..$#array){print $array[$_],"\n";} 去看就知道
→ drm343:問題出在這了
推 abliou:push @array,$a[0].$c.$a[1]; $,=$/; print @array ;
→ sqrt1089:....自我解答，因為我是網頁板的所以要加<br>...
→ sqrt1089:push(@array,"$a[0],$a[1] <br>");