📄 win32.t
字号:
#!./perlBEGIN { if ($ENV{PERL_CORE}) { @INC = '../lib'; }}use File::Spec;use lib File::Spec->catdir('t', 'lib');use Test::More;if( $^O eq 'MSWin32' ) { plan tests => 3;} else { plan skip_all => 'this is not win32';}use Cwd;ok 1;my $cdir = getdcwd('C:');like $cdir, qr{^C:}i;my $ddir = getdcwd('D:');if (defined $ddir) { like $ddir, qr{^D:}i;} else { # May not have a D: drive mounted ok 1;}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -