print: 输出到标准输出设备
#!/bin/perl
use warnings;
use strict;
my @array = qw / fred liken wall larry /;
print @array; #打印出元素的列表
print "@array"; #打印出一个字符串(包含一个内插数组)
Perl在内插数组是,会在元素之间加入空格。
printf: 格式化输出
#!/bin/perl
use warnings;
use strict;
my @items = qw/ wilma dino pebbles /;
my $format = "The items are:/n".("%-10s/n" x @items);
printf $format, @items;
根据format输出数组结果