sub subtract {
    my $self = $_[0];
    return bless [ \ $self ], "...";
}

##</code><code>##

sub subtract {
    return bless [ \ $_[0], ... ], "...";
}