sub new {
    my $class = shift;
    return bless( {}, $class );
}