my $q = FixedSizeQueue->new(max_size => 3); $q->push(3); $q->push(5); $q->push(7); $q->push(9); print Dumper($q);