... which version of Perl are you using?
ruqui: This is an important question. The boon you seek was added with Perl version 5.10:
c:\@Work\Perl>perl -wMstrict -le
"print qq{perl version: $] \n};
;;
my $x;
print $x;
printf '%s', $x;
"
perl version: 5.008009
Use of uninitialized value in print at -e line 1.
Use of uninitialized value in printf at -e line 1.
perl version: 5.010001
Use of uninitialized value $x in print at -e line 1.
Use of uninitialized value $x in printf at -e line 1.
Give a man a fish: <%-{-{-{-<