byp4a55 professor6T9

Linux host.videowhizz.saglus.com 3.10.0-1160.119.1.el7.x86_64 #1 SMP Tue Jun 4 14:43:51 UTC 2024 x86_64
Apache
67.43.5.91

File Name : tbt_01basic.t

#!/usr/bin/perl

use Test::Builder::Tester tests => 9;
use Test::More;

ok(1,"This is a basic test");

test_out("ok 1 - tested");
ok(1,"tested");
test_test("captured okay on basic");

test_out("ok 1 - tested");
ok(1,"tested");
test_test("captured okay again without changing number");

ok(1,"test unrelated to Test::Builder::Tester");

test_out("ok 1 - one");
test_out("ok 2 - two");
ok(1,"one");
ok(2,"two");
test_test("multiple tests");

test_out("not ok 1 - should fail");
test_err("#     Failed test ($0 at line 28)");
test_err("#          got: 'foo'");
test_err("#     expected: 'bar'");
is("foo","bar","should fail");
test_test("testing failing");

test_out("not ok 1");
test_out("not ok 2");
test_fail(+2);
test_fail(+1);
fail();  fail();
test_test("testing failing on the same line with no name");

test_out("not ok 1 - name");
test_out("not ok 2 - name");
test_fail(+2);
test_fail(+1);
fail("name");  fail("name");
test_test("testing failing on the same line with the same name");

test_out("not ok 1 - name # TODO Something");
test_out("#     Failed (TODO) test ($0 at line 52)");
TODO: { 
    local $TODO = "Something";
    fail("name");
}
test_test("testing failing with todo");

Name	Type	Size	Owner/Group	Permission	Last Modified	Actions
.	dir	-	root/root	0755	2016-01-12 03:00:07
..	dir	-	root/root	0755	2016-01-12 03:00:07
tbt_01basic.t	text/x-perl	1.17 KB	root/root	0644	2010-12-10 05:26:04
tbt_02fhrestore.t	text/x-perl	1.17 KB	root/root	0644	2010-12-10 05:26:04
tbt_03die.t	text/x-perl	225 B	root/root	0644	2010-12-10 05:26:04
tbt_04line_num.t	text/x-perl	196 B	root/root	0644	2010-12-10 05:26:04
tbt_05faildiag.t	text/x-perl	824 B	root/root	0644	2010-12-10 05:26:04
tbt_06errormess.t	text/plain	3.03 KB	root/root	0644	2010-12-10 05:26:04
tbt_07args.t	text/plain	5.15 KB	root/root	0644	2010-12-10 05:26:04

Team Anon Force

https://t.me/Professor6T9x