If you have a hash like:

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

Wouldn't that reduce your if-else series to this:

$trimmedcolr=$mapping{$colr};
[download]

Also, if new colors are added, you'd only need to add an entry in the hash.