|
Acme::Homer - Perl extension to put a little Homer in your code |
Acme::Homer - Perl extension to put a little Homer in your code
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: $!"; ...
Use homerism's instead of the normal boring stuff :)
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()
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''
If you think of any good Homerisms that would make good replacements for real funtion names lemme know!
This is really a ``thanks for contributing'' section but I figured why not give it a Homer type name:
Daniel Muey, http://drmuey.com/cpan_contact.pl
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.
|
Acme::Homer - Perl extension to put a little Homer in your code |