PERL語言入門:第三章:列表與數組:習題3

輸入一串字符串（每行一個串）， 之後輸出:

1. 一整行輸出， 在每個之間加空格

2. 分行分別輸出

#!/usr/bin/perl -w
#獲取字符串
chomp(@db=<STDIN>);
#下面爲一行輸出整個數組
print "@db\n";
#下面爲分行輸出每個元素
#for $index (0..$#db){
#	print "$db[$index]";
#	print "\n";
#}
foreach (@db){
	print "$_\n";
}
#注意， 當輸入時， 按空格不代表一個元素， 要按一次回車， 才代表一個元素