NAME

PDL::Index - an index of PDL documentation

DESCRIPTION

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

PDL manuals

EOPOD

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

print POD << 'EOPOD';

PDL scripts

EOPOD

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

print POD << 'EOPOD';

PDL modules

EOPOD

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

print POD << "EOPOD";

HISTORY

Automatically generated by pdlscantree for PDL version $PDL::VERSION.

EOPOD

close POD;