in reply to DocTool.pl: additional Perl Documentation?

my $verbose = ("@ARGV" =~ /\-v/) ? 1 : 0; #: verbose mode if ("@ARGV" =~ /\-v/)
I wonder why you don't use modules. You could use Getopt::Long instead of rolling your own.
use Getopt::Long;

GetOptions (
    'v|verbose'    => \( my $VERBOSE  = 0 ),
);

if ($VERBOSE) {
  ...
}

[download]


sub help { ...
   ...
   ...
}

[download]

I am speechless... How about using HTML::Template?

Replies are listed 'Best First'.
Re: Re: DocTool.pl: additional Perl Documentation?
by Anonymous Monk on Jan 08, 2004 at 11:58 UTC
    Hi,

    I didn't know about, HTML::Template, but after a short glance at it I think it won't help a lot, as only a local file for local use is created (may change if frames are used) and it won't help me with the nested tables and lists - that was the most time consuming work.

    Getopt would only be used for verbose, and I have only 1, but use it if you like it.

    Carl

[reply]

In Section Seekers of Perl Wisdom