>perl -wMstrict -MData::Dump -le "print $]; ;; my $self = { qw(rxml rxml_i_am rxml_ob rxml_ob_it_is) }; dd $self; ;; my( $rxml, $ob ) = @{%$self}{qw/rxml rxml_ob/}; print qq{'$rxml' '$ob'}; " 5.010001 { rxml => "rxml_i_am", rxml_ob => "rxml_ob_it_is" } Can't use string ("2/8") as a HASH ref while "strict refs" in use at -e line 1.