Fun stuff This section contains some perl fun stuff