Name	Size	Mode	Actions
tbt_01basic.t	1274	0644	editdlrm
tbt_02fhrestore.t	1201	0644	editdlrm
tbt_03die.t	225	0644	editdlrm
tbt_04line_num.t	196	0644	editdlrm
tbt_05faildiag.t	824	0644	editdlrm
tbt_06errormess.t	3097	0644	editdlrm
tbt_07args.t	5276	0644	editdlrm
tbt_08subtest.t	268	0644	editdlrm
tbt_09do.t	582	0644	editdlrm
tbt_09do_script.pl	215	0644	editdlrm

#!/usr/bin/perl use strict; use warnings; isnt($0, __FILE__, 'code is not executing directly'); test_out("not ok 1 - one"); test_fail(+1); ok(0,"one"); test_test('test_fail caught fail message inside a do'); 1;