Yes, that was an unfortunate design decision when this could have avoided the issue:

sub new {
    my ($class, $args_href) = @_;
    ....
}
[download]