✏️ 正在编辑: 789-read-only.t
路径:
/usr/share/doc/perl-Test-Simple/t/Legacy/Regression/789-read-only.t
提示:
您可以编辑任何文件(包括二进制文件),但请注意不当修改可能导致文件损坏。
use Test::More; use strict; use warnings; # HARNESS-NO-STREAM # See https://github.com/Test-More/test-more/issues/789 BEGIN { plan skip_all => 'AUTHOR_TESTING not enabled' unless $ENV{AUTHOR_TESTING}; plan skip_all => "This test requires Test::Class" unless eval { require Test::Class; 1 }; plan skip_all => "This test requires Test::Script" unless eval { require Test::Script; 1 }; } package Test; use base 'Test::Class'; use Test::More; use Test::Script; sub a_compilation_test : Test(startup => 1) { script_compiles(__FILE__); } sub test : Test(1) { ok(1); } package main; use Test::Class; Test::Class->runtests;
💾 保存文件
← 返回文件管理器