Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

executable file 47 lines (27 sloc) 0.618 kb
#!perl
# ABSTRACT: Play the game
# PODNAME: snake.pl
use strict;
use warnings;
BEGIN {
if ( $^O eq 'darwin' && $^X !~ /SDLPerl$/ ) {
exec 'SDLPerl', $0, @ARGV or die "Failed to exec SDLPerl: $!";
}
}
use Games::Snake;
Games::Snake->new()->run();
exit;
__END__
=pod
=head1 SYNOPSIS
Start the game from the command line:
snake.pl
=head1 DESCRIPTION
This script starts the game. It will open a 800x600 window (plus the
size of the window frame). Use the arrow keys to control the snake.
Close the window to end the game.
=head1 SEE ALSO
=over 4
=item * L<Games::Snake>
=back
=cut
Jump to Line
Something went wrong with that request. Please try again.