# sub new { bless \pop, shift }
sub new { my $self = pop; bless \$self, shift }