[gitmo/Mouse.git] / t / 000-load.t

#!perl -T
use strict;
use warnings;
use Test::More tests => 1;

use_ok 'Mouse';

diag "Soft dependency versions:";
for my $module_name (keys %Mouse::Util::loaded) {
    my $version;
    if ($Mouse::Util::loaded{$module_name}) {
        no strict 'refs';
        $version = ${$module_name . '::VERSION'};
    }
    else {
        $version = "(provided by Mouse::Util)";
    }

    diag "    $module_name: $version";
}

eval { require Moose };
no warnings 'uninitialized';
diag "    Class::MOP: $Class::MOP::VERSION";
diag "    Moose: $Moose::VERSION";
Commit	Line	Data
c3398f5b	1	#!perl -T
	2	use strict;
	3	use warnings;
	4	use Test::More tests => 1;
	5
	6	use_ok 'Mouse';
	7
00136d64	8	diag "Soft dependency versions:";
	9	for my $module_name (keys %Mouse::Util::loaded) {
	10	my $version;
	11	if ($Mouse::Util::loaded{$module_name}) {
	12	no strict 'refs';
	13	$version = ${$module_name . '::VERSION'};
	14	}
	15	else {
	16	$version = "(provided by Mouse::Util)";
	17	}
	18
	19	diag " $module_name: $version";
	20	}
	21
081ecb94	22	eval { require Moose };
	23	no warnings 'uninitialized';
	24	diag " Class::MOP: $Class::MOP::VERSION";
	25	diag " Moose: $Moose::VERSION";