my $zip_1 = '';
#...
printf ">%12.12s<\n", $zip;
printf ">%12.12s<\n", '123456789012';