My first JAPH attempt (ever, honest). Apologies for the gratuitous use of unpack "u*"
:-).

#!/usr/bin/perl -w use strict; sub z{split(/O/)}$_='0409101911091129120914191439145915091539154915691 +57916291'. '639164916582OFODOEOO0OAOBOEO7O6OCOO3O6OCO9OO1O4O5O8O6OC F;V-T*"(D85LD +7R!N95PB'. '7"(_;V-T*%PB,\'@D7UPB*2LQ.C!=(BD`';m/([^8]*)8(\w*) (.*)/;$_=$1;y/9/O/ +;my@a=z; $_=$2;foreach(z){print chr eval unpack "u*",$3}