1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
#!/usr/bin/env bash
MODULE=`perl -ne 'print $1 if m{all_from.+?([\w/.]+)}' Makefile.PL`;
perl=perl
$perl -v
rm -rf MANIFEST.bak MANIFEST Makefile.old && \
echo > '_.tar.gz' && \
pod2text $MODULE > README && \
$perl -i -lpne 's{^\s+$}{};s{^ ((?: {8})+)}{" "x(4+length($1)/2)}se;' README && \
$perl Makefile.PL && \
rm *.tar.gz && \
make manifest && \
$perl -i -lne 'print unless /(?:\.tar\.gz$|^dist|^tmp|uploads\.rdf)/' MANIFEST && \
make clean && \
$perl Makefile.PL && \
make && \
TEST_AUTHOR=1 make test && \
make disttest && \
make dist && \
cp -f *.tar.gz dist/ && \
perl tmp/cpants.pl && \
make clean && \
rm -rf MANIFEST.bak Makefile.old && \
echo "All is OK"
|
