何これ便利1$ とか 2$ とかで文字列に続く引数の1番目、2番目を指定できる。perldoc -f sprintf より: printf '%2$d %1$d', 12, 34; # prints "34 12" 1個の引数を2回使うこともできる。CPAN本にあった例(P.155): use Text::Xslate qw(html_escape); # ... s…