Modules

yet another switch statement for Perl