maint/Makefile.PL.include

   1 BEGIN { -e 'Distar' or system("git clone git://git.shadowcat.co.uk/p5sagit/Distar.git") }
   2 use lib 'Distar/lib';
   3 use Distar;
   4 use IO::All;
   5
   6 author 'mst - Matt S. Trout (cpan:MSTROUT) <mst@shadowcat.co.uk>';
   7
   8 manifest_include bin => qr/[^.].*/;
   9
  10 # rebuild the fatpacked lib/Tak/STDIONode.pm
  11 system("maint/mk-fat");
  12
  13 # rip the example Takfile out of the synopsis so I can play with it
  14 # more easily
  15 my $tak_pm = io('lib/Tak.pm')->all;
  16
  17 my ($takfile) = $tak_pm =~ /(  package Tak::MyScript.*?  1;\n)/s;
  18
  19 $takfile =~ s/^  //mg;
  20
  21 io('Takfile')->print($takfile);
  22
  23 1;