use strict;
use warnings;

use Data::Dumper;

use Games::Tournament::RoundRobin;

my $schedule = Games::Tournament::RoundRobin->new(v => 6, league => [1..6]);

print Dumper($schedule->wholeSchedule());