为什么printf和sprintf在给定数组时表现不同？

Question

sub do_printf  { printf @_ }
sub do_sprintf { print sprintf @_ }

do_printf("%s\n", "ok");  # prints ok
do_sprintf("%s\n", "ok"); # prints 2

Answer 1

sprintf有原型$@而printf有原型@

Answer 2

来自sprintf上的perldoc:

与printf不同,当你传递一个数组作为你的第一个参数时,sprintf不会做你可能的意思.数组被赋予标量上下文,而不是使用数组的第0个元素作为格式,Perl将使用数组中的元素计数作为格式,这几乎从来没用过.

Answer 3

请参阅codeholic's和Mark's答案,了解他们为什么表现不同.

作为一种解决方法,只需:

sub do_sprintf { print sprintf(shift, @_) }

然后,

sub do_printf  { printf @_ }
sub do_sprintf { print sprintf(shift, @_) }

do_printf("%s\n", "ok");  # prints ok
do_sprintf("%s\n", "ok2"); # prints ok2