sub
MY::libscan {
my
(
$self
,
$file
) =
@_
;
return
undef
if
$file
=~ /\.pl$|^README.pod/;
return
$self
->SUPER::libscan (
$file
);
}
sub
MY::postamble {
my
$text
=
<<'FOO';
install ::
@echo "Updating PDL documentation database...";
@$(PERL) -e "exit if $$ENV{DESTDIR}; use PDL::Doc; eval { PDL::Doc::add_module(q{PDL::Trasform::Color}); }; ";
FOO
return
$text
;
}
WriteMakefile(
NAME
=>
'PDL::Transform::Color'
,
AUTHOR
=>
'Craig DeForest <craig@deforest.org>'
,
VERSION_FROM
=>
'lib/PDL/Transform/Color.pm'
,
ABSTRACT_FROM
=>
'lib/PDL/Transform/Color.pm'
,
LICENSE
=>
'perl'
,
MIN_PERL_VERSION
=>
'5.010'
,
CONFIGURE_REQUIRES
=> {
'ExtUtils::MakeMaker'
=>
'6.48'
,
},
TEST_REQUIRES
=> {
'Test::More'
=>
'0.88'
,
},
PREREQ_PM
=> {
'PDL'
=>
'2.094'
,
'PDL::Graphics::ColorSpace'
=>
'0.203'
,
},
META_ADD
=> {
resources
=> {
}
},
dist
=> {
COMPRESS
=>
'gzip -9f'
,
SUFFIX
=>
'gz'
, },
clean
=> {
FILES
=>
'PDL-Transform-Color-* pdl_transform_color_test_* *~'
},
);
my
$POD_header
=
<<EOF;
=head1 OVERVIEW
This module provides transformations for manipulating color. This repository
stores the history for the PDL::Transform::Color module on CPAN.
=cut
EOF
if
(
exists
$ARGV
[0] &&
$ARGV
[0] eq
'README.pod'
)
{
open
MOD,
'lib/PDL/Transform/Color.pm '
or
die
"Couldn't open main module"
;
open
README,
'>README.pod'
or
die
"Couldn't open README.pod"
;
print
README
$POD_header
;
while
(<MOD>)
{
if
(/^=/../^=cut/) {
print
README; }
}
}