Select Code to Download

sub test_parser(\%) {
use Data::Dumper;
print Dumper(@_);
}

    %myhash = @_; #this is where the problem is!!
    
...

    }

%myhash = %myoriginalhash;