ghcfilt

[Ashley Yakeley]

--Emailer_-1163084487
Content-Type: text/plain; charset="US-ASCII"

Here's a Perl script that does it.

-- 
Ashley Yakeley, Seattle WA

--Emailer_-1163084487
Content-Type: application/text; name="ghcfilt";
 x-mac-type="54455854";
 x-mac-creator="00000000"
Content-transfer-encoding: base64
Content-Disposition: Attachment; filename="ghcfilt"

IyEvdXNyL2Jpbi9wZXJsCiMgV3JpdHRlbiBieSBBc2hsZXkgWWFrZWxleSAyMDAzCiMgQWxsIHJp
Z2h0cyB0byB0aGUgcHVibGljCgp3aGlsZSAoPD4pCgl7CglzL1x3Ky9kZWNvZGUoJCYpL2VnOwoJ
cHJpbnQ7Cgl9CgpzdWIgY29tbWFzCgl7Cglsb2NhbCgkaSkgPSBAXzsKCWlmICgkaSA9PSAwKQoJ
CXsKCQlyZXR1cm4gIiI7CgkJfQoJZWxzaWYgKCRpID09IDEpCgkJewoJCXJldHVybiAiICI7CgkJ
fQoJZWxzZQoJCXsKCQlyZXR1cm4gIiwiIHggKCRpIC0gMSk7CgkJfQoJfQoKc3ViIGRlY29kZQoJ
ewoJbG9jYWwoJHMpID0gQF87CglteSAkYT0iIjsKCXdoaWxlICgkcyA9fi8oW156Wl0qKShbelpd
LiopLykKCQl7CgkJJGEuPSQxOwoJCWlmICgkMiA9fi8oW3paXVtBLVphLXpdKSguKikvKQoJCQl7
CgkJCQl7CgkJCQkkYS49IigiLGxhc3QgaWYgJDEgPX4vWkwvOwoJCQkJJGEuPSIpIixsYXN0IGlm
ICQxID1+L1pSLzsKCQkJCSRhLj0iWyIsbGFzdCBpZiAkMSA9fi9aTS87CgkJCQkkYS49Il0iLGxh
c3QgaWYgJDEgPX4vWk4vOwoJCQkJJGEuPSI6IixsYXN0IGlmICQxID1+L1pDLzsKCQkJCSRhLj0i
WiIsbGFzdCBpZiAkMSA9fi9aWi87CgoJCQkJJGEuPSJ6IixsYXN0IGlmICQxID1+L3p6LzsKCQkJ
CSRhLj0iJiIsbGFzdCBpZiAkMSA9fi96YS87CgkJCQkkYS49InwiLGxhc3QgaWYgJDEgPX4vemIv
OwoJCQkJJGEuPSJeIixsYXN0IGlmICQxID1+L3pjLzsKCQkJCSRhLj0nJCcsbGFzdCBpZiAkMSA9
fi96ZC87CgkJCQkkYS49Ij0iLGxhc3QgaWYgJDEgPX4vemUvOwoJCQkJJGEuPSI+IixsYXN0IGlm
ICQxID1+L3pnLzsKCQkJCSRhLj0iIyIsbGFzdCBpZiAkMSA9fi96aC87CgkJCQkkYS49Ii4iLGxh
c3QgaWYgJDEgPX4vemkvOwoJCQkJJGEuPSI8IixsYXN0IGlmICQxID1+L3psLzsKCQkJCSRhLj0i
LSIsbGFzdCBpZiAkMSA9fi96bS87CgkJCQkkYS49IiEiLGxhc3QgaWYgJDEgPX4vem4vOwoJCQkJ
JGEuPSIrIixsYXN0IGlmICQxID1+L3pwLzsKCQkJCSRhLj0iJyIsbGFzdCBpZiAkMSA9fi96cS87
CgkJCQkkYS49IlxcIixsYXN0IGlmICQxID1+L3pyLzsKCQkJCSRhLj0iLyIsbGFzdCBpZiAkMSA9
fi96cy87CgkJCQkkYS49IioiLGxhc3QgaWYgJDEgPX4venQvOwoJCQkJJGEuPSJfIixsYXN0IGlm
ICQxID1+L3p1LzsKCQkJCSRhLj0iJSIsbGFzdCBpZiAkMSA9fi96di87CgkJCQkkYS49Ij8/PyI7
CgkJCQl9CgkJCSRzID0gJDI7CgkJCX0KCQllbHNpZiAoJDIgPX4vWihbMC05XSspVCguKikvKQoJ
CQl7CgkJCSRhLj0iKCIuY29tbWFzKCQxKS4iKSI7CgkJCSRzID0gJDI7CgkJCX0KCQllbHNpZiAo
JDIgPX4vWihbMC05XSspSCguKikvKQoJCQl7CgkJCSRhLj0iKCMiLmNvbW1hcygkMSkuIiMpIjsK
CQkJJHMgPSAkMjsKCQkJfQoJCWVsc2lmICgkMiA9fi9aKFswLTldKylVKC4qKS8pCgkJCXsKCQkJ
JGEuPWNocigkMSk7CgkJCSRzID0gJDI7CgkJCX0KCQllbHNlCgkJCXsKCQkJJGEuPSI/Pz8iLiQy
OwoJCQkkcyA9ICIiOwoJCQl9CgkJfTsKCXJldHVybiAkYS4kczsKCX07
--Emailer_-1163084487--