introspection (and Perl 6)

[Peter Corlett]

On Mon, Jan 21, 2008 at 03:55:47PM -0800, Ovid wrote:
[...]
>   IDENTIFICATION DIVISION.
>   PROGRAM-ID. NOT-PERL-SIX.
>   WORKING-STORAGE SECTION.
>   01  WIBBLES.
>       05  NICK     PIC X(10) VALUE "chromatic".
>       05  FILLER   PIC XXXX.
[etc]

That'd be somewhat more readable if it wasn't written in Great Runes and one
was using a vaguely sane editor with syntax and error highlighting.

I'm guessing it's defining a few structs and copying variables. If so, the
equivalent non-golfed Perl code probably wouldn't be much shorter, and be
just as confusing to a COBOL programmer.