Game in Perl using SDL 1.2