作者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