[libmoosex-has-sugar-perl] 12/120: Add tree sterlizier stuff

[Intrigeri]

This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to annotated tag 0.05070422-source
in repository libmoosex-has-sugar-perl.

commit 7b535b8a82584a2930841ab9f17e57b79b981de0
Author: Kent Fredric <kentfredric at gmail.com>
Date:   Mon Sep 16 19:18:55 2013 +1200

    Add tree sterlizier stuff
---
 merge_travis_yml.pl | 31 +++++++++++++++++++++++++++++++
 sterilize_env.pl    | 16 ++++++++++++++++
 yamls/sterile.yaml  | 13 +++++++++++++
 3 files changed, 60 insertions(+)

diff --git a/merge_travis_yml.pl b/merge_travis_yml.pl
new file mode 100644
index 0000000..548efb5
--- /dev/null
+++ b/merge_travis_yml.pl
@@ -0,0 +1,31 @@
+#!/usr/bin/env perl 
+
+use strict;
+use warnings;
+use utf8;
+
+use Path::FindDev qw( find_dev );
+
+my $hashref  = {};
+
+my $template = find_dev('./')->child('.travis-template.yml');
+my $target   = find_dev('./')->child('.travis.yml');
+
+if ( -f -e $template ) {
+    require YAML::Loader;
+    my $loader = YAML::Loader->new();
+    $hashref = $loader->load($template->slurp);
+}
+
+if ( not exists $hashref->{language} ) {
+    $hashref->{language} = 'perl';
+}
+if ( not exists $hashref->{perl} ) {
+    $hashref->{perl} = [ '5.18', '5.19' ];
+}
+
+use Data::Dump qw(pp);
+pp($hashref);
+require YAML::Dumper;
+my $dumper = YAML::Dumper->new();
+$target->spew($dumper->dump($hashref));
diff --git a/sterilize_env.pl b/sterilize_env.pl
new file mode 100644
index 0000000..1a4ae6e
--- /dev/null
+++ b/sterilize_env.pl
@@ -0,0 +1,16 @@
+#!/usr/bin/env perl 
+use strict;
+use warnings;
+use utf8;
+
+if ( not exists $ENV{TRAVIS} ) {
+    die "Is not travis!";
+}
+for my $i (@INC) {
+    next if $i !~ /site/;
+    next if $i eq '.';
+#    printf "%s\n", $i;
+    system('find',$i, '-type', 'f', '-delete');
+    system('find',$i, '-depth', '-type', 'd', '-delete' );
+}
+
diff --git a/yamls/sterile.yaml b/yamls/sterile.yaml
new file mode 100644
index 0000000..862d0c7
--- /dev/null
+++ b/yamls/sterile.yaml
@@ -0,0 +1,13 @@
+language: perl
+perl:
+  - "5.16"
+  - "5.14"
+  - "5.18"
+  - "5.19"
+before_install:
+  - perl ./maint-travis-ci/sterilize_env.pl
+branches:
+  only:
+    - "build/master"
+    - "releases"
+

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoosex-has-sugar-perl.git