<?php
 
function x($s){$r='preg_replace';$s=$r('/ +/',' ',$s);$s=$r(array('/ \^COMMA/','/ \^COLON/','/ \^SEMICOLON/','/ \^PERIOD/','/ \^BANG/','/\^DASH/','/ \^HYPHEN /','/ \^EMDASH /','/\^OPENQUOTE /','/ \^CLOSEQUOTE/'),array(',',':',';','.','!','-','-','--','"',',"'),$s);$s=$r('/(^\W*\w|([\.!]| ")\W+\w)/e','strtoupper("$0")',$s);$s=$r('/([,\.!]),/','\1',$s);$s=$r('/(\w)( "\w)/e','"$1,".strtoupper("$2")',$s);echo$s;}
 
echo x("once upon a time ^COMMA there was a horse ^PERIOD that horse cost me $50 ^PERIOD ^OPENQUOTE eat your stupid oats ^COMMA already ^BANG ^CLOSEQUOTE I told the horse ^PERIOD the horse neighed back ^OPENQUOTE no ^CLOSEQUOTE and died ^PERIOD I always hated that stupid horse ^DASH his name was Franklin ^HYPHEN James the III ^PERIOD I decided to go and buy a new animal ^EMDASH a cow ^EMDASH named Franklin ^HYPHEN James ^SEMICOLON however ^COMMA this time he was the first in his line, so his full name was simply Franklin ^HYPHEN James ^PERIOD That cow sucked ^PERIOD I wish I could have the talking horse named Ed ^PERIOD One time, I went to a circus and they had a banner that said ^COMMA ^OPENQUOTE COME SEE ED ^COLON THE TALKING HORSE ^BANG ^CLOSEQUOTE but I had no money so I did not get to see him ^PERIOD THE END ^PERIOD");
 
 

PD9waHAKCmZ1bmN0aW9uIHgoJHMpeyRyPSdwcmVnX3JlcGxhY2UnOyRzPSRyKCcvICsvJywnICcsJHMpOyRzPSRyKGFycmF5KCcvIFxeQ09NTUEvJywnLyBcXkNPTE9OLycsJy8gXF5TRU1JQ09MT04vJywnLyBcXlBFUklPRC8nLCcvIFxeQkFORy8nLCcvXF5EQVNILycsJy8gXF5IWVBIRU4gLycsJy8gXF5FTURBU0ggLycsJy9cXk9QRU5RVU9URSAvJywnLyBcXkNMT1NFUVVPVEUvJyksYXJyYXkoJywnLCc6JywnOycsJy4nLCchJywnLScsJy0nLCctLScsJyInLCcsIicpLCRzKTskcz0kcignLyheXFcqXHd8KFtcLiFdfCAiKVxXK1x3KS9lJywnc3RydG91cHBlcigiJDAiKScsJHMpOyRzPSRyKCcvKFssXC4hXSksLycsJ1wxJywkcyk7JHM9JHIoJy8oXHcpKCAiXHcpL2UnLCciJDEsIi5zdHJ0b3VwcGVyKCIkMiIpJywkcyk7ZWNobyRzO30KCmVjaG8geCgib25jZSB1cG9uIGEgdGltZSBeQ09NTUEgdGhlcmUgd2FzIGEgaG9yc2UgXlBFUklPRCB0aGF0IGhvcnNlIGNvc3QgbWUgJDUwIF5QRVJJT0QgXk9QRU5RVU9URSBlYXQgeW91ciBzdHVwaWQgb2F0cyBeQ09NTUEgYWxyZWFkeSBeQkFORyBeQ0xPU0VRVU9URSBJIHRvbGQgdGhlIGhvcnNlIF5QRVJJT0QgdGhlIGhvcnNlIG5laWdoZWQgYmFjayBeT1BFTlFVT1RFIG5vIF5DTE9TRVFVT1RFIGFuZCBkaWVkIF5QRVJJT0QgSSBhbHdheXMgaGF0ZWQgdGhhdCBzdHVwaWQgaG9yc2UgXkRBU0ggaGlzIG5hbWUgd2FzIEZyYW5rbGluIF5IWVBIRU4gSmFtZXMgdGhlIElJSSBeUEVSSU9EIEkgZGVjaWRlZCB0byBnbyBhbmQgYnV5IGEgbmV3IGFuaW1hbCBeRU1EQVNIIGEgY293IF5FTURBU0ggbmFtZWQgRnJhbmtsaW4gXkhZUEhFTiBKYW1lcyBeU0VNSUNPTE9OIGhvd2V2ZXIgXkNPTU1BIHRoaXMgdGltZSBoZSB3YXMgdGhlIGZpcnN0IGluIGhpcyBsaW5lLCBzbyBoaXMgZnVsbCBuYW1lIHdhcyBzaW1wbHkgRnJhbmtsaW4gXkhZUEhFTiBKYW1lcyBeUEVSSU9EIFRoYXQgY293IHN1Y2tlZCBeUEVSSU9EIEkgd2lzaCBJIGNvdWxkIGhhdmUgdGhlIHRhbGtpbmcgaG9yc2UgbmFtZWQgRWQgXlBFUklPRCBPbmUgdGltZSwgSSB3ZW50IHRvIGEgY2lyY3VzIGFuZCB0aGV5IGhhZCBhIGJhbm5lciB0aGF0IHNhaWQgXkNPTU1BIF5PUEVOUVVPVEUgQ09NRSBTRUUgRUQgXkNPTE9OIFRIRSBUQUxLSU5HIEhPUlNFIF5CQU5HIF5DTE9TRVFVT1RFIGJ1dCBJIGhhZCBubyBtb25leSBzbyBJIGRpZCBub3QgZ2V0IHRvIHNlZSBoaW0gXlBFUklPRCBUSEUgRU5EIF5QRVJJT0QiKTsKCg==