Select Code to Download

#!usr/bin/perl

...
};

say Dumper($hash);

{
  'testing' => {
...
                 'r' => '2'
               }
}

#!/usr/bin/perl

...

say $undump->{'testing'}->{'link'} // (die "'link' not found!");
say $undump->{'testing'}->{'bandwidth'} // (die "'bandwidth not found!
+");