Select Code to Download

#!/usr/bin/perl -wT
use strict;
use Image::Magick;
...
    }
    die ("the heck kind of color is this? [$color]");
}