BEGIN { my @colors=(...);
  sub colorize {
    ...
  }
}