$width = 20; $value = sin(1.0);
foreach $precision (0..($width-2)) {
	printf "%${width}.${precision}f\n", $value;
}
