Select Code to Download

sub property($\%;$) { ## no critic -- prototype
    &_check_property;
    push @_, scalar caller();
    &_install_property;
}

sub _install_property{
    my ($label, $hash, $opt, $caller) = @_;
...
    }
    return;
}