如何在Perl中将字符串对齐到一个模式？

ChatGPT的回答仅作参考：

在Perl中，可以使用`printf`函数来将字符串对齐到一个模式。`printf`函数使用格式化字符串来指定输出的格式，并且可以使用特殊的格式控制符来对齐字符串。

下面是一个示例，演示如何将字符串对齐到一个模式：

```perl
my $str1 = "Hello";
my $str2 = "World";
my $str3 = "Perl";

printf("%-10s %-10s %-10s\n", $str1, $str2, $str3);
```

在上面的示例中，`%-10s`是一个格式控制符，其中`-`表示左对齐，`10`表示字段宽度为10个字符，`s`表示字符串类型。通过在格式化字符串中使用多个格式控制符，可以将多个字符串对齐到一个模式。

输出结果如下：

```
Hello      World      Perl      
```

在这个例子中，每个字符串都被对齐到一个宽度为10个字符的字段中，字段之间用空格分隔。