use Lifevis::QuadTree;

my $test = Lifevis::QuadTree->new(
    -xmin   => 0,
    -xmax   => 15,
    -ymin   => 0,
    -ymax   => 15,
    -parent => undef,
    -pos    => undef
);

for my $x (0..3) {
    for my $y (0..3) {
        next if( $x ==0 and $y == 0);
        $test->fill($x,$y);
    }
}

my $moo = $test->get_rectangles;