On line 13 try changing "If" to "if".

[frink@truth ~]$perl
if(1) { print "yeah\n"; }
yeah
[frink@truth ~]$perl
If(1) { print "no\n"; }
syntax error at - line 1, near ") {"
Execution of - aborted due to compilation errors.
[download]