Perl B&WPerl Color