NAME

PDL::Index - an index of PDL documentation

DESCRIPTION

A meta document listing the documented PDL modules and the PDL manual documents

PDL manuals

EOPOD

print $podfh "=over 4\n\n"; for (@mans) { my $ref = $_->[2]->{Ref}; $ref =~ s/Manual:/$_-[0]> -/; print $podfh "=item *\n\n$ref\n\n"; }

print $podfh <<'EOPOD';

PDL scripts

EOPOD

print $podfh "=over 4\n\n"; for (@scripts) { my $ref = $_->[2]->{Ref}; $ref =~ s/Script:/$_-[0]|PDL::$_->[0]> -/; print $podfh "=item *\n\n$ref\n\n"; }

print $podfh <<'EOPOD';

PDL modules

EOPOD

print $podfh "=over 4\n\n"; for (@mods) { my $ref = $_->[2]->{Ref}; next unless $_->[0] =~ /^PDL/; if( $_->[0] eq 'PDL'){ # special case needed to find the main PDL.pm file. $ref =~ s/Module:/PDL -/; print $podfh "=item *\n\n$ref\n\n"; next; } $ref =~ s/Module:/$_-[0]> -/; print $podfh "=item *\n\n$ref\n\n"; }

print $podfh <<"EOPOD";

HISTORY

Automatically generated by scantree.pl for PDL version $PDL::VERSION.

EOPOD

close $podfh;

#add the newly-created PDL::Index to the doc database $onldc->scan($outindex,$opt_v) if (-s $outindex); $onldc->savedb(); 1;