Dude, this is Perl. The most powerful text munging language on earth. You want pod. You got pod. Just paste the module into the data section (as shown) and let her rip. Not the prettiest pod ever but it's all there. You can probably pretty it up some more if you want:

while ( <DATA> ) {
    next unless /^\s*#/;
    s/#//;
    next if /^\s*$/;
    if (/####/) {
        print "\n\n=head1 ";
        next;
    }
    s/^\s*(?=\(@\))//;
    print
}
print "\n=cut"

__DATA__
######################################################################
+#########
#
# Win32::GUI - Perl-Win32 Graphical User Interface Extension
#
# 29 Jan 1997 by Aldo Calpini <dada@perl.it>
#
# Version: 0.0.558 (15 Jan 2001)
#
# Copyright (c) 1997..2001 Aldo Calpini. All rights reserved.
# This program is free software; you can redistribute it and/or
# modify it under the same terms as Perl itself.
#
######################################################################
+#########

[yabada yabada]
[download]

cheers

tachyon

s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

Well that works. Actually I was going to write that up myself. Heh. Thanks.


"Wierd things happen, get used to it"

Flame ~ Lead Programmer: GMS
http://gms.uoe.org

HTH,

/J

That definately helps.


"Wierd things happen, get used to it"

Flame ~ Lead Programmer: GMS
http://gms.uoe.org