my $self = bless( { 'rxml' => 'test', 'rxml_ob' => 'test2' } );

##</code><code>##

my( $rxml, $ob ) = @{%$self}{qw/rxml rxml_ob/};

##</code><code>##

my( $rxml, $ob ) = @{$self}{qw/rxml rxml_ob/};