Green::updateRec(%ARGS) #### sub updateRec { $new = shift @_; #### $new = (%$new); #### sub updateRec { my $new = shift @_;
## sub updateRec { $new = shift @_; ##
## $new = (%$new); ##
## sub updateRec { my $new = shift @_;