use Data::Dumper;

my %hash = (
    9 => {
        11 => '54.9503577512828',
        21 => '40.4544882398113',
    },
    4 => {
        11 => '26.7647206436788',
        21 => '19.4128184125387',
    }
);

##</code><code>##

$VAR1 = '4';
$VAR2 = {
          '11' => '26.7647206436788',
          '21' => '19.4128184125387'
        };
$VAR3 = '9';
$VAR4 = {
          '11' => '54.9503577512828',
          '21' => '40.4544882398113'
        };

##</code><code>##

$VAR1 = {
          '4' => {
                   '11' => '26.7647206436788',
                   '21' => '19.4128184125387'
                 },
          '9' => {
                   '11' => '54.9503577512828',
                   '21' => '40.4544882398113'
                 }
        };