if(open my $fh, '>', $xmlFile )
        { print $fh $xml; }
        else 
        { warn "WARNING: Could not Open *$xmlFile* ($!)\n"; }

        if(open my $fh, '>', $dumperFile )
        { print $fh Dumper $rhDiffResult; }
        else
        { warn "WARNING: Could not Open *$dumperFile* ($!)\n"; }