Select Code to Download

sub new {
    my $class = shift @_;
    if(my $arg = shift @_) {
...
        __PACKAGE__->_throw_error("This method [new] requires a single
+ argument.");        
    }
}