read FILE, my $foo, 1;
sprintf ('%u', $foo);

##</code><code>##

Useless use of sprintf in void context at ./test.pl line 5.
Argument "^R" isn't numeric in sprintf at ./test.pl line 5.