$_='/\ \/' 49.upto(getc){gsub(/.+/){$_=$/*3 $&.bytes{|c|u=('%50s//\ \\\ \// '%p+' \/\ / /'*5)[c,16] gsub(/$/){u.slice!0,4}} $_}} print