📄 pl_files.t
字号:
#!/usr/bin/perl -wBEGIN { if( $ENV{PERL_CORE} ) { chdir 't' if -d 't'; @INC = ('../lib', 'lib'); } else { unshift @INC, 't/lib'; }}chdir 't';use strict;use Test::More tests => 9;use File::Spec;use MakeMaker::Test::Setup::PL_FILES;use MakeMaker::Test::Utils;my $perl = which_perl();my $make = make_run();perl_lib();setup;END { ok( chdir File::Spec->updir ); ok( teardown );}ok chdir('PL_FILES-Module');run(qq{$perl Makefile.PL});cmp_ok( $?, '==', 0 );my $make_out = run("$make");is( $?, 0 ) || diag $make_out;foreach my $file (qw(single.out 1.out 2.out blib/lib/PL/Bar.pm)) { ok( -e $file, "$file was created" );}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -