Makefile.PL

   1 #!/usr/bin/env perl
   2
   3 use warnings;
   4 use strict;
   5
   6 use ExtUtils::MakeMaker;
   7
   8 my $version = get_version();
   9
  10 WriteMakefile(
  11     'NAME' => 'umph',
  12     ( $[ >= 5.8 )
  13     ? ( AUTHOR => 'Toni Gundogdu <legatvs@gmail.com>',
  14         'ABSTRACT' => 'command line video playlist parser for c/clive'
  15         )
  16     : (),
  17     'VERSION'   => $version,
  18     'EXE_FILES' => ['bin/umph'],
  19     'PREREQ_PM' => {
  20         'Getopt::ArgvFile' => 1.11, # tested, earlier may work
  21         'XML::DOM' => 1.44, # tested, earlier may work
  22     },
  23     'LICENSE' => 'gpl',
  24     dist => {
  25         COMPRESS => 'bzip2',
  26         SUFFIX => '.bz2'
  27     },
  28 );
  29
  30 sub get_version {
  31     my $path = 'bin/umph';
  32     open my $fh, "<", $path or die "$path: $!";
  33     foreach (<$fh>) {
  34         close $fh and return $1
  35             if $_ =~ /VERSION = "(.*?)"/;
  36     }
  37     close $fh;
  38     die '$path: could not find version string.';
  39 }
  40
  41