my $a;
$a = sprintf($a, 1, 2, 3)
