SinFP是一种新的识别对方计算机操作系统类型的工具

				BEGIN {				    if( $ENV{PERL_CORE} ) {				        chdir 't';				        @INC = '../lib';				    }				}												use Test::More tests => 2, import => [qw(!fail)];								can_ok(__PACKAGE__, qw(ok pass like isa_ok));				ok( !__PACKAGE__->can('fail'),  'fail() not exported' );