...
{
  no warnings 'uninitialized';
  printf $format , @values;
}
...