Allow passing number of values wanted to $rng->get()
[Math-GSL.git] / bin / smoke_some_mathgsl
blob46d7dfe4405d0cfab804efb4abff12bf4d6c2f5e
1 #!/usr/local/bin/perl5.10 -w
2 use strict;
3 use warnings;
4 use lib 'lib';
6 my $make      = 'make'; 
7 my $branch    = shift || 'master';
8 my $base_dir  = "/home/smoke/git/Math-GSL-$branch";
10 chdir $base_dir or die "$base_dir: $!";
12 my $smolder  = qq{ export PERL5LIB=`pwd`/lib && /home/smoke/bin/smolder_mathgsl };
14 system "cd $base_dir && git pull origin $branch ";
15 system "perl Build.PL && ./Build && $smolder && ./Build clean";
17 print "You just smoked some Math::GSL on branch $branch\n";