Re: Re: printf vs. sprintf

[a]

huh.

@a = ('a%sc','b');
   printf @a;          # prints abc
print "\n";
   printf scalar @a;          # prints 2
print "\n";
   print sprintf @a;   # prints 2
print "\n";
  print sprintf @a[0,1]; # prints b
print "\n";
  print @a[0,1]; # prints a%scb
print "\n";
  print scalar @a[0,1]; # prints b
print "\n";
  print $a[1]; # prints b
print "\n";
  $huh = scalar @a[0,1]; # prints huhb
  print "huh", $huh;
print "\n";
  printf sprintf @a[0,1]; # prints b

so sprintf evals in scalar (?) context, printf in array? Is there a why behind this?

a

[chipmunk]

The explanation I remember from perl5-porters for this odd difference in behavior involves the optional filehandle argument for printf. The way prototypes were designed for the builtin functions, a prototype which allows for an indirect object has to specify list context for all the regular arguments. Since sprintf doesn't have an optional file handle argument, its prototype specifies a scalar for the first argument, and a list for the remaining arguments.

So, this difference in behavior between printf and sprintf is more by accident than by design. While the prototype for sprintf could be changed to match the prototype for printf, doing so would break backwards compatibility, particularly where the first argument to sprintf is a subroutine call.