Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • I was curious to see what he did about that, and discovered he wrote quite a bit of code that really doesn't do anything. He loads a program then traverses %INC. He skips certain entries, and everything else must be from CPAN ignoring core modules, and anything else he neglected not to skip. He then sums all the lines (and CPAN modules are more likely to have a lot of POD) from the files and adds those to either the CPAN or the local count.

    That's pretty useless outside of writing Perl code to kill time.
    • That's pretty useless outside of writing Perl code to kill time.

      Agreed, totalling interesting looking things included versus size of script is a strange number. Meaningless.

      As always, we should say "Compared to what?".

      A more plausibly useful metric of reuse would use static or dyanmic analysis to determine how many lines/functions/feature-points of the use'd modules were actually used., compared to same for the script. I'm not sure even that is going to be useful to anyone but PHB's, but at least it's le

      --
      Bill
      # I had a sig when sigs were cool
      use Sig;