Perl Diving
This was written for my creative writing class. The story definitely has some structural problems I wasn’t able to fix, so to make it less likely anyone ever reads it I will leave it in compressed form.
use Compress::Zlib;use MIME::Base64; print(uncompress(decode_base64(“eJxtWt3OHMdxve dTdIBcSMB+n+mIdhBKCUPJMvjZpiNYVgwhCIKemd6d5vZMj/pnl8MrvUOuAsQvpyfJOVU9s8tYN9Jyv5nu6qpTp05V77OffvzfN/H6049/NT6bNdZkjj7lYn6oLhcf54M5xhDi1Q3GFmPN4HOxczHZ9XEeTLcarHAdV6zwyI9/GSMXy85N2QR/dsaXn378Hzzp8PaSXCmrSc7mONsuONOP0ffOlBgPpquFJuDx5Mwciymjw6fVlUfzOoT2t4szJ/zNyp/NFCcHc2A8/yW2WGz415fYy88FZpeo5youTX62gTZbk/20YPslxVOyE9+3MLcUfBcvLplfm7dfmnjEW+/LwfRxwnLZzyfD9Y1dFmdT5tpyLv49uOIOJvdudg/d+iAfzOByn/xCT3I1MST4Ix48pjjpvzufysjzvHj52a/N67fGz1jyq+AuLlj4eIx58cWGA7ezXYSX/um5wVlqcTD7FGGTm7mWudJfJ/iYlsLLw8p3grNw2jWm86N59ux7PNfHGoYDLcKnlGEOIuLDiuDDz9hfXOuznPhus1WeDkfjj7qfbS5+NH8e3doC7YCaupg6Fx9kpWCBqNHiPTvjODVhP/wxOewY04CopPXRfC/Osd1kuZUcpXepWD/jsTrnmhgDJ6DjqlzwYUQcaIJ739fsxKiaNeruYgcC5OKBJn8aC+Dx38BVF+GW0Q50UMDS7v3ieq7Bl1tECU18zJ4oS7GeRvNdKEAKDvCPQGPWneYQ+7O+yTgC7RJWWneyyZ6wEgKYXYGrj2aIV/XsNcaB5+ALWBReWqz6Gkl1cbOHd2DY1ZcRsVDHIQbEZsOQXXBsIv8gC+Y6w+wTjIPRQ+3P+BeSVt0Uk//AREZoKzNAwHH1eVlNH2IdsgIux2MxSIaBu3Ojxc9nsT8mO5/co3k6akbuYcY7k4uAuQvwvWYrjaaNh5auwC/Rd3QBi3bBn2xLSvLIoP4pNgGCfsZJaZv1yNbR4xSymBywb0YxOU+Jjsx1mpCoxwDzDuaEc2Uz2LmXFfoU88ZnttcwIBERLDxFT4uzgV7fB4Btj1pX8+jy4Q67+Sx81Y9kQCzmGZqH3Zf49pQc0AsWRcKmwy0PbYBrDrJ1c43NgJ+ZHV46xoQT9KNZImjHCTO6OTvBaEmOmU3XAPc0GQ4yAWcPhD5sz/dsCfdmRsPNAtQoYZoY1Z1vBNdI8V4QD4aQs/nBWck7gSKZZnJ8DVTg5p62p+QvdFUOTCASBFLZMTzAWs3VBlLK07wlZLhapHQtGUv/DVLpmWOsjLpZkM3AswPcQ1wcPQ4YTItTSPDYNjhw1IanZGYL62ZnaQa2H64JfI1j0+AJW4Pn8G+wclRzjsEuj+ZbnEk4u9gzHradBa4+mZh0IP1clyU2vgCRbrku9IdQk7/PQGae4WZUmfLqUz0GTJ7xFukhgjRnBjQwp1vOHmnwAgLIDMcQKwjlIS+AIo70y394WKKnR/7sJzzxR3c1f4qgFmFRKTmClesYcVQs7nq/AEFkJea7mEicvKuZNTk7VGvEi1ux8CJgeA9JOwDVr7/96ukJZRZ01NM7Gu+8sDrIOYfYV8YnM25a/MTd6lPUB1A8YJ3qPBMJ8je3wuzOTaRacvhFIAHMWSXGhSuRVJYoWQuTICcSqSJHlAaiH7Q/u6RHnmJS7l7wYdjXM0hGoP/QKn17Zic6nBU+ZsznLP5o5cLkdepiaPoDmuDvKUkIK3z+502eaNBj3+M8ArI6C6BBBurP9cDjDH5A5oH/EgtFcuDpON+W/tf6u7vFv/hCdBA9DKYIugWUjEicsR2+i15oTk55I5qudp1837meSL/4GEh6LatJ7MwPxbYbTq4lOlywwI/Pnr2xkqqpcl/GkvHjA4oejYxUfuGQM95XMIO35lKFGXbfLsGuN/olUTDny43d8E3QQoJnUIUvlA+xO9bcCyv2KHGSmuSUJrOITFT4+VSRGfBuaFi+lXmqPqJEVr2iBoy3HY8WJdBbQOatXVGkv3EpvBJft2xUtrNLiYsEBFoCtS/WTNZEOlCKdU5Rf0sIqDuw67Hy+GD5/kwj4YEJfAF+UNBJIevj4tvre8q591glrDvNz2QDcSWp1gkqEJ5gppXEuf4X/fK4BOLk2bPXeGmO14NRoYujSCUMMYoVonFhP9YWHtkJBdFFij2a3yKPWHVWYGO9VQOpzQjPxe0FO6v67j3F3iRJ8xCPDyiO5f+L1HYkVbq0iSkgxchesWXwyyIuuuPKhQLvCBqb4lzGrDZJoZKz5D12WrYiPceV89kvN+F9rInmGlJ0qxZevUq5mDwLtRenCjwGB9CEBmugFo7EyjD8Yk+VlTIhyacOC0pNHTcVyOeBBjqE0hr6aA1WDg8RBjfi1L+iDJe1AATKRP/hBoN8pfxXu75FqV4KwA82U6sy0ZdjqOrOKvyXg3MLDIaAvchWn8vbBfSvlJYiO6UZu42CExZq4Bf+ZbVdAGwRLI62qJhhHmtVskc8c7VpoHtOBCx3RU8mokRcgzrVOU1gAAoq40WjVkXVQnKbJWPJGcIrnrIQPD2Jva9A03j5Lq472CifERuEFEXQl6zHkL226v6qtR17OIlWNi0HOvszdHhspiJbks3JAmFJ2qN/r5rfIhK9tAunjfq+RGbB8d+MPiCfAT7fC3PxkW+R68HXrBWmMZBkgmYP6mxo6Bnhpo82rvPeATByB2kXejIZNTyEitfmTw4ktDNFge7Vll7cA3C5JO6TwqysjR3dxWdpq7Wzu+0L3MRhe/CzxC8AmU3DeSwLdg4VWRIj+XWx79CNgL3OMFB2hJopbN/wAZome54gRwYaDceOFqE1HvoUJdG04xn2DvuWNZ4lXsRf7aC0T9Q7swYWzbPugGTzGVjMUq7w5wkBH9ZD4+IKpSo5u1eKfAXscPDZra327fz+EddaJOb63lv21FsiAsKov33VWcTeWO6HbbOA1h72CG+UeBMR4Hc0NB8+WFQntqtfX6gcj3dNyqAKQ5StNZ89EJQPwKQscYm97WpAn9oEvpRR6WwEMJRqotV66N1OGzWl1U658j5PhI8Ed9h0oP+QVtJeDKSJyZ58DxEhSQFmovr6uMOHVZss2PuIrS3YixVL2SYEoDnimeCCYkOKwByQ3q3rCb5LcjRnqXN0ZJDmVun6RKLo3KjZK6MWW8ELNZ2Epxa0PqjKf9nqhWp8KlgYYRfmEImX9Ya6/SW6OWh7KbwD/cFPYOFBk7QprKai2DaOVYoHUP9yL0pyRpUPKpaF38FVF7crjI0loLpCa76Uu+4DDf8TjcSRTUEGRewTD6KrlbzbqGhTmpIBImvcpfE8nGfekcIZ0ZMntrJ0QpR4MB87wcMep9rmL4D+XIVhUG4pj+9nQ+/qJCk92mW0H8Ds0va1csuaYdmpoxNinJbmKqGe1nMNkI7aMsu0RrT+V1CPYMQgeP4S2RpPq8CHLvpV0ZUPe7ZqC4QIz3mfOsB/TpAkqXxkNYD3jMC8Yx8tqthSBZypsUXEUGEjiCVVKoPRD4P2bNLcqPBA4rdw3wpEcXfKr0kqyyq3Cb1vxt8ogr96+535hIOLqlWcszx2z+zt/QQtA8Qz1McjBwus02gcG2N6BQ++pOc/PbR5jbtNuoZESDGLEKu6gPthGTu272M6tzlGKjJd21jpjU3MUBxIajb7J3H0W0SlJ4ng/ZpipzHYp0kyZUBl1mpoT7GxKNHA/Dt5UeZs3qU3Iy/sqrN9oyVAnVmS6mlODYdJW9X9WHd5JKMFFZywch8smDMFFXUxgsA1v97bhDtx5suurpoERQlAlXEyFxDnWjTtV5gweAnPNo9FouOgOPEJwF4+Z4hQHvui2sdxROMoBkW7e/aeTSZjgXeRIyvCCL4lg/olyBQRJdZOwN/gBMQz/IzFep/6CmmCzmFt820a2+acaBMO5ok5efSD6Dq45mknl/kuVjejebAfKic3sMFPfpCx2ufiADKBLnNoZGBFHCOVkAV9kQZSpzvHo+9l3oZ+wi86JrF6YDdIHqFOas+mrZHIWhy2bwmSWl2RDl5jZ0OmaAWZDrVvD73Dfzj7Zin3rYVtaM1sNn9AXH0BFn/jZNKzTVmpAidp1uAQglp6FJlB/z6GKZ5iipc2/n6PBXYw3DpG2YMUipPigchZJvzQBnAs6pOzrP37YBdt76mMO3ujNBTh5zarl1Vlus/81QmP8roUHiGBppJP6AuTtKPCFI3J2SHDV0JWWv5y2XZTdPzy+eH58+fcZOKTd9Vemi0djfysA1iqOai1+6ptrTaOmSu1VTaTtCKy5BzbGdP9EZti5PwNh2EXyRN/Yv5DJ+fNhf9pPr3dvHBfifZSO0GIhHmybOuR4qeWWNs4QeRUQ0kT2A1w7DCJNNQlRD/sCYitCIQucggIsY5dp1Wpj7O0CP1yiWgWWTQF6dKMpHbfc4PDEvEldPK03LuWPbebOK3mpRE93eEI099hV62aZCnWgPXu8kTb/cOdYqcelooHgx9h7RBV+HbBarelDYF0OyNF84LNCGiO+3yWSXzkZFdujFRYQJwndQsHylRxQx7Ruu6DqpkzOxL3ngDF9SMi27PXTWUjTCljQQgSlcWe2p2DTri6eJXma+KY9cKer7SRkdAqbzNYRvCqyEFl1yxiha/fRuOjF9LmHPlMKqrLxnWoSJFqQhHMq5gs85bfVYY7prkNP1RMtKsF3rpoSdl8yXsfbY23IQO2c+e8GUZiE0krgQLvxWn2VlJS2v5iVzVLhARlB6eDKjzqPNaUPK1sFya2/MyNCeejJAcr20jJ3MTMsQrwpDZSaN4GZbnoOfYeR0ZkMUqF+6glvxtci5s7iF1UbmBz2I8hYzpBLd27WHSfB94yLEtoCTW/966sN+re8RJ4PcHeO6E9TqQNMnfjv8UGbSKOTssYHtROrM7ZHvVkcruwdxKQ2IuMXImdwPS6NVdaPraZP2+sstQQHUZzrScU1rC0GzBWKboFwp8IXOWYyWYW9D80nSCN48bt6A/YyW/vUmvqXAfif5Bku02gKJVUTUpc5esxitidZKhXbr26ZKeOJaQ38oIpalpmo9bJCn/KLQvdp1wOLU/6AKVeN10lo/wF/9Epn+XMFwkOdtimAK0T32avsctoQ7ZB017PeF8KYh2xH1/QyduVnYvEYEHdP7Rv89TYmDd/TIXD3dBZhmpOZ0EXDSJKISt+JrvrNB6nDBwnMoNmXv2oZniD2ECXn/ViE8Vp8j2SHgTahnQuXdjOv9lPxIkuChR9rAoSgkfhyD6myOWeUgFsXEBtm/yHRhIxYJyX4YbVMRbA1a49t+lEirBxdxWn2EOW5IV1lV1TY5VdfaqCmNGGIfRuGfEA+/z3a4m9b8ORzhX7AGtiWkZ2TjzRXSPMoeRGqGhQIW/urt6Y0hbc0PythaMI0XBpjnvbpQ8E3cIfMjTiAvLPe4zalu5O9z7R7a2rBhq2PuCwc8LM8HNSSlawJ2CutXxgD7b+LWn0fsi73t2N4LxEe94yRJXNSBPwyqpFUq58Bqc/ZoDC2G/0mtA5CBUFAv7r+QQNMh5krvDRhHcf8kHN6vFkSiYestLh0okTt+qctrpnin28A4HlUljb7wtY1cm6bcHWDLxog2peWorkUga8KY82axR5OcnwIhbK9NHGvN3YOQ7Cb92i2koVPcIEcr5mOnblPcCh2bwJic5t24nYk003rc3y56capMRLTUQSJpa4N05rKSek+t7mg/ZTAdFpckbeBKGv78LaSjfSPS2ypjIzDNt+iCHn3KVdlP7TtRy43dAi9Xp/1Hgqnu5juBlSrBAwSucUb6pVbhYp3h+2G5i/2ffmfbCm/KACgdQ7+I8OLAkvP2oh4Xrt3S1vQTuZKlv9Z6sqXbuXAwmWUZWvaFcZREvpquWg8347DxtWmMbrK6OjkBDz1sms7db7muzSijAVGNrp2uaswh6ySpv2PZp/A2U1xpo049qlsb3dWi/aTwkpK02UdYHbAhTXqgPr9aPfCEHZpunn7mx0TMFOCCHYb99yoxXSkBrCHxgwUcTh4+2ie+/2AaWmnLY/bYNzoqkUMOo2doFQvLLOyclPUS6991vbu178IwfdmhmRNKRqEUkIUi6iKv7dyq82oO5QCp89Y7u+6Ttp/ffpKJJbWI3j99bC6nnr/FG9Vrozr0VRtJt186QLKC/KukwffjtxO7ePzB/Nl5V9tzyjzXP2BM5T+4kDdP4iP1LIZatQnKPJD0PmIBWEPCS/N8P/pV/afqg0RHYoiOqL5y/MH0FGvxVIffHdn/7wcixlefmLX9gF53jv9b6Ds0q684Gp+SCC4/EEUNXu0cd/kcu7/wO45X9t”)));