gpt4 book ai didi

Perl 打印格式

转载 作者:行者123 更新时间:2023-12-02 03:15:02 26 4
gpt4 key购买 nike

我想在 Perl 中打印时将字符串格式化(截断/附加字符)为指定长度。

例如

$string='my_string';
printf("%04s",$string);

应该打印

my_s

如果

$string='my';

我应该得到

00my

有什么方法可以打印最后四个字符吗?

ring

如果字符串是

$string='my';

它应该打印

00my

最佳答案

您想要执行此格式字符串而不是您的格式字符串:

printf ("%04.4s", $string);

您需要 .4,因为它指定了最大长度。 (开头的4仅指定最小值)

以下是一些测试的输出:

$ perl -e "my \$string = \"my_string\";print sprintf(\"%04.4s\", 22);"
0022
$ perl -e "my \$string = \"my_string\";print sprintf(\"%04.4s\", \$string);"
my_s
$ perl -e "my \$string = \"my\";print sprintf(\"%04s\", \$string);"
00my

这是使用错误格式字符串的输出。正如您所看到的,字符串没有被截断。

$ perl -e "my \$string = \"my_string\";print sprintf(\"%04s\", 22);"
0022
$ perl -e "my \$string = \"my_string\";print sprintf(\"%04s\", \$string);"
my_string

关于Perl 打印格式,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/6445768/

26 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com