2 things. First use the CODE tag when posting code. It makes indentation come through. Secondly Perl is case sensitive. Your Print is not the same as print.

Cheers,
Ben