# $Id: TicTacToe.pm,v 1.1.1.1 2008/10/12 04:05:34 alamos Exp $
# The state is in an array
package TicTacToe;
use strict;
use TicTacToe::Player;

use base qw(Exporter);
use vars qw(@ISA $VERSION @EXPORT);

$VERSION='1.0';
@EXPORT = qw(&play);

## This is here because a module must return a value
BEGIN {
    &play;
}
1;