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

##</code><code>##

$trimmedcolr=$mapping{$colr};