use warnings;

"my" variable $x masks earlier declaration in same scope at ./monks.pl line 7.
main::printme() called too early to check prototype at ./monks.pl line 6.
main::printme() called too early to check prototype at ./monks.pl line 8.
Use of uninitialized value $x in concatenation (.) or string at ./monks.pl line 11.