#!/usr/bin/perl -w
open (O,$0)
&& map
{s/( {2,})/print ' ' eq$1?
' ' : chr 0x5e+ length
$1/eg } <O>
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Pithy Japh
by collin (Scribe) on Sep 29, 2005 at 05:03 UTC | |
by liverpole (Monsignor) on Sep 29, 2005 at 05:13 UTC |