perl -le'print 5 == (localtime)[6] ? "w" : "b", "oohoo"'