A simple perl script to create a low res bitmap from a string.