Na}{

Server IP: 162.240.74.182

Your IP: 216.73.217.6

Web Server: Apache

System: Linux 3.10.0-1160.119.1.el7.x86_64 (shell_exec disabled)

User: gdg

PHP Version: 8.0.30

Disable Function: exec, passthru, shell_exec, system

MySQL: OFF

cURL: ON

WGET: OFF

Perl: OFF

Python: OFF

Sudo: OFF

Pkexec: OFF

Command Bosku:

Path: ~//usr/share/doc/perl-Test-Simple-0.98/t/subtest/

File Content: `singleton.t`

#!/usr/bin/perl -w

BEGIN {
    if( $ENV{PERL_CORE} ) {
        chdir 't';
        @INC = ( '../lib', 'lib' );
    }
    else {
        unshift @INC, 't/lib';
    }
}

use strict;
use warnings;
use Test::More tests => 3;

{

    package Test::Singleton;

    use Test::Builder;
    my $TB = Test::Builder->new;

    sub singleton_ok ($;$) {
        my( $val, $name ) = @_;
        $TB->ok( $val, $name );
    }
}

ok 1, 'TB top level';
subtest 'doing a subtest' => sub {
    plan tests => 4;
    ok 1, 'first test in subtest';
    Test::Singleton::singleton_ok(1, 'this should not fail');
    ok 1, 'second test in subtest';
    Test::Singleton::singleton_ok(1, 'this should not fail');
};
ok 1, 'left subtest';

Edit Rename Chmod Delete

FILE FOLDER

Name	Size	Permission
args.t	328 bytes	0644
basic.t	5313 bytes	0644
die.t	531 bytes	0644
do.t	274 bytes	0644
exceptions.t	1857 bytes	0644
for_do_t.test	112 bytes	0644
fork.t	1245 bytes	0644
implicit_done.t	479 bytes	0644
line_numbers.t	3672 bytes	0644
plan.t	1377 bytes	0644
predicate.t	4482 bytes	0644
singleton.t	712 bytes	0644
todo.t	5392 bytes	0644
wstat.t	369 bytes	0644

N4ST4R_ID | Naxtarrr

Command Bosku:

File Content: singleton.t

File Content: `singleton.t`