Select Code to Download

#! /usr/bin/perl
use warnings;
...
}

print join '. ', $colours[$number], $even_odd, $emotions[$number], "\n
+";