package Err;

sub new {
    return bless {}, shift;
}

sub err {
    my $self = shift;
    my %args = @_;
    # Do something with %args here
}