$ perl -c 1202669.pl

Operator or semicolon missing before %hash at 1202669.pl line 13.
Ambiguous use of % resolved as operator % at 1202669.pl line 13.
Bareword "p" not allowed while "strict subs" in use at 1202669.pl line 13.
Bareword "hash" not allowed while "strict subs" in use at 1202669.pl line 13.
1202669.pl had compilation errors