perl问题：怎样传递变量给printf？

[RegentW]

$length = length($keyword);

printf ("%24s %-10s %-24s\n", $leftstr, $str, $rightstr);

红色部分我希望用$length代替

[poet]

perl的串可以展开，本来这样或许就可以了

printf ("%24s %-$lengths %-24s\n", $leftstr, $str, $rightstr);

但是上面这句话实际上不能用：就是 $length后面有个s，导致perl去寻找名为 lengths 的变量。结果找不到。所以不能用

可能有个什么办法避开，在python里面是用 ${length}s 就可以避开这个问题，在 perl 里面你要搜一下。

[BigSnake.NET]

perl里一样