use Perl

• Plot of Shame (Score:3, Informative)

  by zool (1822) <zooleika@abduction.org> on 2003.05.11 17:08 (#20010) Homepage

  to my chagrin i must admit to being the author of this module :)

  extenuating circumstances; i was in a rush to catch the last train home after a hacksesh, and wanted to upload SVG::Plot to slot in with kake's [perl.org] dependencies (cf CGI::Wiki [cpan.org] and OpenGuides).

  it being a while since the last (and first) time i put a module on CPAN, i'm not overfamiliar with h2xs or make dist and make tar-dist.

  to my further chagrin this morning, i realised i'd not only put the module in the wrong namespace, but hadn't actually included the code. Kake showed me the way and the light, for which i am deeply grateful; there've been two more point releases since then.

  An edge case quite this inane and dubious is pretty difficult to account for in any sensible automated module-checking, but perhaps my slightly intoxicated stupidity has provided some food for thought ;) i've never met a CPAN packaging HOWTO; a 'do you really want to do this' function might be useful on PAUSE ... (perhaps with an option for "don't let me upload this if it's after N o'clock at night in my personal timezone...")

  i hope this has caused more amusement than it has consternation and despair, anyway.

  Reply to This

  • Re:Plot of Shame (Score:2, Informative)

    by ethan (3163)

    i hope this has caused more amusement than it has consternation and despair, anyway.
    
    It's not a big deal really. Since I am very much afraid of upload-mistakes myself I double- and triple-check the tarballs that leave my computer. And not even that can prevent some silly but unpleasant errors. My favourite one is forgetting to increase $VERSION.
    • Auto-increasing $VERSION (Score:1)

      by mhx (4226)

      My favourite one is forgetting to increase $VERSION.

      Mine too. But if you're using some sort of revision control system, you can simply do something like

      $VERSION = substr q$Revision: 3.14 $, 10;

      which it's done in a lot of modules or

      ($VERSION) = '$Revision: 3.14 $ ' =~ /\$Revision:\s+([^\s]+)/;

      as suggested by ExtUtils::MakeMaker.