$Wmmyy = sprintf("%0${4}d", $FORM{'SRmmyy'});<br>
$Wmmyy = sprintf("%0*d", 4, $FORM{'SRmmyy'});