Select Code to Download

use Data::Dumper;

...
        21 => '19.4128184125387',
    }
);

$VAR1 = '4';
$VAR2 = {
...
          '11' => '54.9503577512828',
          '21' => '40.4544882398113'
        };

$VAR1 = {
          '4' => {
...
                   '21' => '40.4544882398113'
                 }
        };