programming-examples/perl/String/Printing a space before signed values not preceded by + or -.pl

#!usr/bin/perl

use warnings;
use strict;

printf "% d\n% d\n", 547, -547;