>>388
$z = sprintf( "%04d%02d%02d", $a, $b, $c );