作者sqrt1089 (李崩子)
看板Perl
標題[問題] push&換行
時間Wed Oct 6 22:57:34 2010
我有個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
1F:→ sqrt1089:忘了備註 我搜索過/push 跟/換行 10/06 22:58
2F:推 imce:push(@array,"$a[0],$a[1]\n"); #這樣嗎? 10/06 23:12
3F:推 drm343:原 po 在 while 中的 push 寫法會導致 $a[0]、$c、$[1] 成 10/06 23:24
4F:→ drm343:為三個陣列元素,而不是原 po 想要的一個元素 10/06 23:25
5F:→ sqrt1089:不能,剛去try了。不過你這樣可以讓$b(,)用不到! 10/06 23:26
6F:→ drm343:用 for (0..$#array){print $array[$_],"\n";} 去看就知道 10/06 23:27
7F:→ drm343:問題出在這了 10/06 23:27
8F:推 abliou:push @array,$a[0].$c.$a[1]; $,=$/; print @array ; 10/07 01:14
9F:→ sqrt1089:....自我解答,因為我是網頁板的所以要加<br>... 10/07 15:05
10F:→ sqrt1089:push(@array,"$a[0],$a[1] <br>"); 10/07 15:05