[perl5.git] / t / porting / cmp_version.t

#!./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';
find_git_or_skip('all');

system "$^X Porting/cmpVERSION.pl --exclude --tap";
Commit	Line	Data
c8aeb9c6 A	1	#!./perl -w
c8aeb9c6 A	2
c8aeb9c6 A	3	# Original by slaven@rezic.de, modified by jhi and matt.w.johnson@gmail.com
	4	#
	5	# Adapted from Porting/cmpVERSION.pl by Abigail
76733a60	6	# Changes folded back into that by Nicholas
c8aeb9c6	7
18388fdb NC	8	BEGIN {
	9	@INC = '..' if -f '../TestInit.pm';
	10	}
7eccb5a9	11	use TestInit qw(T A); # T is chdir to the top level, A makes paths absolute
c8aeb9c6	12	use strict;
76733a60	13
7cadc1d0 NC	14	require 't/test.pl';
7cadc1d0 NC	15	find_git_or_skip('all');
c8aeb9c6	16
7eccb5a9	17	system "$^X Porting/cmpVERSION.pl --exclude --tap";