package Rdw::BigInt;                 sub new # construktor; als optimalen parameter kann eine große Zahl als String oder ein Object vom Typ Rdw::BigIntübergeben werden         {            # ...         }                 sub set # erhält als parameter $bigint eine große Zahl als String oder ein Object vom Typ Rdw::BigInt         {            my ($self, $bigint) = @_;            # ...         }                 sub add # addiert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt         {            my ($self, $bigintobj) = @_;            # ...         }                 sub sub # subtraiert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt         {            my ($self, $bigintobj) = @_;            # ...         }                 sub mul # multipliziert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt         {            my ($self, $bigintobj) = @_;            # ...         }                 sub div # dividiert $bigintobj; $bigintobj ist vom Typ Rdw::BigInt         {            my ($self, $bigintobj) = @_;            # ...         }                 sub mod # modulo rechnung $bigintobj; $bigintobj ist vom Typ Rdw::BigInt         {            my ($self, $bigintobj) = @_;            # ...         }                         sub get_data #  gibt einen String zurück, der die Zahl repräsentiert         {           my ($self) = @_;         }                 1;