in reply to Ode to St Patrick
Try this code change for "green beer".
#print $pint; print "\033[42m $pint \033[m"; [download]