or download this
Unquoted string "easy" may clash with future reserved word at D:\_Perl
+_\pl_test\977910.pl line 6.
Unquoted string "hard" may clash with future reserved word at D:\_Perl
+_\pl_test\977910.pl line 9.
Found = in conditional, should be == at D:\_Perl_\pl_test\977910.pl li
+ne 13.
...
Found = in conditional, should be == at D:\_Perl_\pl_test\977910.pl li
+ne 47.
Name "main::RNG" used only once: possible typo at D:\_Perl_\pl_test\97
+7910.pl line 21.
D:\_Perl_\pl_test\977910.pl syntax OK