我像一個目錄中的一些文件:串聯並打印每個數組元素帶有後綴
A.txt
B.txt
C.txt
我想用新的後綴將它們打印:
#!/user/bin/perl
my @dir_list_initial = `ls *.txt | sed 's/.txt//g' `;
my $suffix = ".dat";
for (my $i=0; $i<=$#dir_list_initial; $i++){
print $dir_list_initial[$i] . $suffix;
}
我希望打印
A.dat
B.dat
C.dat
但它打印
.datA
.datB
.datC
很好!作品:) – EpiMan 2014-12-05 13:39:16
請在投票正確答案時發表評論。 – 2014-12-09 06:37:06