#!/usr/local/bin/perl for ($i = 0; $i<256; $i++){ if (($i%8)==0){ print "\n"; } printf "%d %c\t",$i,$i; }