$ostr = sprintf("$format", @stuff);
printf $ostr;

##</code><code>##

> perl -wle "$f=sprintf'%-13s','%util';print $f;printf $f"
Use of uninitialized value $f in printf at -e line 1.
0til