Converting Module::Install prereqs to Dist::Zilla with elisp

By Sebastian Willert on January 11, 2011 4:02 PM

After half a day of yak-shaving that started with having to port yet another Makefile.PL to the dist.ini format, I am now finally able to post this small snippet of elisp code to blogs.perl.org from within emacs (more on that later):

(defun sbw/prereqs-to-dist-zilla ()
  (interactive)
  (save-excursion
   (while
       (re-search-forward
        (concat
         "^\\(build_\\)?requires *['\"]\\([^'\"]*\\)['\"]"
         " *\\(=>\\|,\\)? *['\"]?\\([0-9_.]*\\)?['\"]? *[;,]")
        nil t)
     (replace-match
      (let
          ((module (match-substitute-replacement "\\2"))
           (version (match-substitute-replacement "\\4")))
        (concat module " = " (if (string= version "") "0" version)))
      t nil)
     ))
)

Hope someone finds this useful... oh, and, yeah: first post!

Cheers,
    Sebastian

2 comments

2 Comments

autarch.urth.org | January 11, 2011 6:31 PM | Reply

Have you looked at Dist::Zooky on CPAN? I find it does a pretty good first pass.

Sebastian Willert replied to comment from autarch.urth.org | January 11, 2011 6:47 PM | Reply

No, I haven't stumbled upon it. Seems like a great tool.

Name

Email Address

URL

Remember personal info?

Comments (You may use HTML tags for style)

About Sebastian Willert

Programming Perl 5 in Emacs for over a decade, blogging since a few minutes. Expect tidbits about both technologies here (if at all, I'm not too sure I can develop a blogging habit).

More info »

Irreverential Interventions