Perl 5 module to create context-senstive return values
