return {%hash}; 
    
    $node="";
    @parents=(); 
    @nodevalues=();
    %hash=();
    @nodeindex=();
    @temparray=();
    $string="";
    @temp=();
    $s="";
}
[download]

Are you aware that the effect of a return statement is immediate?
All those assignments after the return, above, don't get executed.