#!./perl -w # Original by slaven@rezic.de, modified by jhi and matt.w.johnson@gmail.com # # Adapted from Porting/cmpVERSION.pl by Abigail # Changes folded back into that by Nicholas BEGIN { @INC = '..' if -f '../TestInit.pm'; } use TestInit qw(T A); # T is chdir to the top level, A makes paths absolute use strict; require 't/test.pl'; my $source = find_git_or_skip('all'); chdir $source or die "Can't chdir to $source: $!"; system "$^X Porting/cmpVERSION.pl --exclude --tap";