package mobilty;
use strict;
use warnings;

%mobility::label = (
       "Blubber" => "17.5",
       "MONSTER" => "6.1",
);

package main;
use strict;
use warnings;

print $mobility::label{MONSTER};