moo@cow[6]~>which moon aliased to perl -MAstro::MoonPhase -e "printf qq{The Moon is %.3f%% full\n},100*(phase)[1]" moo@cow[9]~>moon The Moon is 1.109% full