A lookup table is a pattern now? http://search.cpan.org/~gsar/perl5.005/pod/perlfaq7.pod#How_...