Term::GentooFunctions ============= Provides gentoo's einfo, ewarn, eerror, ebegin and eend. This is not something that's in use in any Gentoo packages that I'm aware of. It's simply a port of Gentoo's /sbin/functions.sh (used mainly for startup messages) to Perl for the purposes of decorating command line apps. use Term::GentooFunctions qw(:all) einfo "this is kinda neat..."; ebegin "I hope this works..."; This module also provides a handy way to go do something with a message: my $return = edo "doing something" => sub { $x = 17; }; .... eend $truefalse; # the result is backwards of gentoo; ie, 0 is bad, 1 is good.