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