#!/usr/bin/perl -l print,s/^/_/,s/./$'& z^$&^Z/eg,y/5/o/for($a=o)x80 [download]
In reply to Re^3: Pascal-Sierpinski for golfers by brx in thread Pascal-Sierpinski for golfers by brx