La Documentación

A partir del final del código hemos colocado la documentación. No olvides nunca actualizarla de acuerdo con los cambios que hagas en tu módulo.

    61  =head1 NAME
    62
    63  Algorithm::Knap01DP - Solves the 0-1 Knapsack problem using 
                              the Dynamic Programming Technique
    64
    65  =head1 SYNOPSIS
    66
    67    use Algorithm::Knap01DP;
    68
    69    my ($M, $w, $p) = ReadKnap($file);
    70
    71    my @f = KnapP01DP($M, $w, $p);
    72
    73  =head1 DESCRIPTION
    74
    75  Solves the 0-1 Knapsack problem using the Dynamic Programming Technique.
    76
    77     my @f = KnapP01DP($M, $w, $p);
    78
    79    $M is the capacity
    80    $w is a reference to the array of weights
    81    $p is a reference to the array of profits
    82
    83  Returns the table $f[$k][$c] containing the optimal value for
    84  objects 0..$k and capacity $c.
    85
    86  =head2 EXPORT
    87
    88  None by default.
    89
    90  =head1 SEE ALSO
    91
    92  L<Algorithm::Knapsack>
    93
    94  =head1 AUTHOR
    95
    96  Casiano Rodriguez Leon E<lt>casiano@ull.esE<gt>
    97
    98  =head1 COPYRIGHT AND LICENSE
    99
   100  Copyright (C) 2005 by Casiano Rodriguez Leon
   101
   102  This library is free software; you can redistribute it and/or modify
   103  it under the same terms as Perl itself, either Perl version 5.8.4 or,
   104  at your option, any later version of Perl 5 you may have available.
   105
   106
   107  =cut

Observe las salidas y los comentarios en inglés. Si tu intención es hacer público el módulo en CPAN es recomendable que las salidas, los nombres de variables y los comentarios estén en ese idioma.