1#!/usr/bin/perl 2 3use strict; 4BEGIN { 5 $| = 1; 6 $^W = 1; 7} 8 9use Test::More tests => 4; 10 11require_ok( 'Test::NoWarnings' ); 12ok( $Test::NoWarnings::VERSION, 'Loaded Test::NoWarnings' ); 13ok( $Test::NoWarnings::Warning::VERSION, 'Loaded Test::NoWarnings::Warning' ); 14is( 15 $Test::NoWarnings::VERSION, 16 $Test::NoWarnings::Warning::VERSION, 17 'Loaded matching Test::NoWarnings::Warning', 18); 19