Class::Business::DK::CVR - Danish CVR number class

The documentation describes version 0.01 of Class::Business::DK::CVR

    use Class::Business::DK::CVR;

    my $cvr = Class::Business::DK::CVR->new(27355021);

    my $cvr_no = $cvr->get_number();

    my $cvr_no = $cvr->number();

    $cvr->set_number(27355021);

This is an OOP implementation for handling Danish CVR numbers. The class gives you an CVR object, which is validated according to the CVR rules, see: Business::DK::CVR.

This is the constructor, it takes a single mandatory parameter, which should be a valid CVR number, if the parameter provided is not valid, the constructor dies.

This method/accessor returns the CVR number associated with the object.

Alias for the get_number accessor, see above.

This method/mutator sets the a CVR number for a given CVR object, it takes a single mandatory parameter, which should be a valid CVR number, returns true (1) upon success else it dies.

* You must provide a CVR number, thrown by set_number and new if no argument is provided.

* Invalid CVR number parameter, thrown by new and set_number if the provided argument is not a valid CVR number.

The module requires no special configuration or environment to run.

* Class::InsideOut

* Business::DK::CVR

The module has no known incompatibilities.

The module has no known bugs or limitations

Coverage of the test suite is at 98.3%

* Please refer to the TODO file

* Business::DK::CVR

Please report issues via CPAN RT:

  http://rt.cpan.org/NoAuth/Bugs.html?Dist=Business-DK-CVR

or by sending mail to

  bug-Business-DK-CVR@rt.cpan.org

Jonas B. Nielsen, (jonasbn) - <jonasbn@cpan.org>

Business-DK-CVR and related is (C) by Jonas B. Nielsen, (jonasbn) 2006-2009

Business-DK-CVR and related is released under the artistic license

The distribution is licensed under the Artistic License, as specified by the Artistic file in the standard perl distribution (http://www.perl.com/language/misc/Artistic.html).