Select Code to Download

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

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