Kevin Pfeiffer wrote:
> Hi Paul,
> > sub get_class_types
> > {
> > my $self = shift;
> >
> > my $roots = [];
> > my $unresolved = [];
> >
> > while (my ($class, $props) = each %{$self->{classes}})
> > {
> > push @{$props->{parent} ? $unresolved : $roots}, $class;
>
Hi Paul,
In article <[EMAIL PROTECTED]>, Paul
Johnson wrote:
[...]
> I presume this is code that you have just made up on the spot rather than
> something taken from a working project, but I couldn't say for sure what
> the Classes hash was doing. Here's how I would code something similar for
>
Paul Johnson wrote:
>
> > sub get_root_classes {
> > my $self = shift;
> >
> > my @root_classes;
> > my @unresolved_classes;
> >
> > foreach (keys $self->{'Classes'}) {
> > if ($_->{'parent'}) {
> > push $_, @unresolved_classes;
> > } else {
> > push $_, @root_classes;
R. Joseph Newton said:
> Paul Kraus wrote:
>
>> Reading through the doc's it says that it is preferred that you write
>> the -h help info using POD. How is this down? Any links on how to write
>> pod or have a perl script display pod for built in help.
I think someone's already mentioned Pod::Usa
Paul Kraus wrote:
> Reading through the doc's it says that it is preferred that you write
> the -h help info using POD. How is this down? Any links on how to write
> pod or have a perl script display pod for built in help.
>
> Do you guys really use POD to document your apps instead of #comments?
perldoc perlpod
or
http://www.perldoc.com/perl5.8.0/pod/perlpod.html
No i have never used pod to document my code, however many modules from cpan do.
Never really wanted till now ;)
For the help, i use the here doc as follow for instance :
my $helptxt=< -of [-f] [-h]
-f force blabla
-h display t
On Tue, May 27, 2003 at 12:12:12PM -0400 Paul Kraus wrote:
> Reading through the doc's it says that it is preferred that you write
> the -h help info using POD.
Which docs state that?
> How is this down? Any links on how to write
> pod or have a perl script display pod for built in help.
Pod::U
