#!/usr/local/bin/perl5

# generate "strike" of all characters in range 0 .. 255

foreach $i (0..255)
{
	printf "%s: %c\n", $i, $i;
}
