#!/usr/bin/perl
$myfmt="%3d : %4.2f : %3d\n";
printf $myfmt, 111,12.34,-1;
printf $myfmt, 22,0.00, -2;
printf $myfmt, -2,-6.25, -3;
=pod
111 : 12.34 :  -1
 22 : 0.00 :  -2
 -2 : -6.25 :  -3
=cut