$ perl -MWin32::Console::ANSI dna.pl