如何将所有内容都放在一行中？

Question

这是我的代码：

 open(my $fh, '>', $filename) or die "Could not open file '$filename' $!";
  print $fh "GIF files: \t$gif_nums(Number of files) file(s) $gif_sizes(File size) bytes\n";
  print $fh "HTML files: \t$html_nums file(s) $html_sizes bytes\n";
  print $fh "Total: $total_nums file(s) $total_sizes bytes\n";
  close $fh;

我的输出是这样的：

GIF files: 1
 file(s) 48835 bytes
HTML files: 1
 file(s) 260 bytes
Total: 2 file(s) 49095 bytes

我想要这样的输出：

GIF files:   1    file(s) 48835 bytes
HTML files:  1    file(s) 260 bytes
Total:       2    file(s) 49095 bytes

如何在Perl中获得这种类型的输出？

Answer 1

几乎看起来$gif_nums和$html_nums变量可能是带有换行符而不是数字的字符串，因此为什么它将一个print语句散布在两行上。

使用chomp函数从变量中删除换行符是一个好的开始。