NAME
Acme::Homer - Perl extension to put a little Homer in your code
SYNOPSIS
use Acme::Homer;
woohoo "Free beer alright!\n";
mmm "Mcribwhich\n" if $sandwhich eq 'Processed Pork';
open my $beer, $marge or doh "could not open $beer: $!";
...DESCRIPTION
Use homerism's instead of the normal boring stuff :)
Putting the "fun" in FUNCTIONS
woohoo()
Use this instead of print
The only difference is that to print to a filehandle you must do it like so:
open my $list_fh, '<', 'list.txt' or die "Could not open list.txt: $!";
woohoo $list_fh, "whatever";
woohoo \*STDERR, "whatever";If anyone knows of a way to make:
woohoo STDERR "whatever";work exactly like
print STDERR "whatever";Just let me know and I'll put your name down here as the "In your face Flanders" of the day!!
mmm()
Use this instead of Carp::carp()
why_you_little()
Use this instead of Carp::cluck()
doh()
Use this instead of Carp::croak()
no_beer_no_tv_make_homer_go_crazy()
Use this instead of Carp::confess()
EXPORT
All of the funtions described above are exported. Usually I don't do that but I figured: "hey, whats the point of getting uptight about your name space being polluted when you're using a Homer module"
TODO
If you think of any good Homerisms that would make good replacements for real funtion names lemme know!
In your face Flanders
This is really a "thanks for contributing" section but I figured why not give it a Homer type name:
AUTHOR
Daniel Muey, http://drmuey.com/cpan_contact.pl
COPYRIGHT AND LICENSE
Copyright 2005 by Daniel Muey
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.