Select Code to Download

%mapping=(
            'baby blue'=>'BB',
...
            'dark blue'=>'DB',
             #and so on...
         );

$trimmedcolr=$mapping{$colr};