REBOL[]prin[pick[0"(:"'d:M""0"('-' )"]length? a: ask"happy ""new"a"year!"]