> perl -E 'use P;
my $fmt=[qw(%s\t%s\t%s\t%s\t%s prod 006 2.13 x86_64 rpm)];
P "%s", $fmt;  # already converted before fmt
my $str=P @$fmt;
P "str=\"$str\"";
my @flds=split "\t","$str";
Pe "(%s) \x83", "$_" foreach @flds;
P " ";'
["%s\t%s\t%s\t%s\t%s","prod",6,2.13,"x86_64","rpm"]
str="prod\t6\t2.13\tx86_64\trpm"
(prod\t6\t2.13\tx86_64\trpm)