/usr/share/perl5/UR/Test.pm is in libur-perl 0.440-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | package UR::Test;
use base 'Test::Builder::Module';
use strict;
use warnings;
use Exporter 'import';
our @EXPORT_OK = qw(txtest);
sub txtest {
my ($name, $subtests, @args) = @_;
my $tb = __PACKAGE__->builder;
my $tx = UR::Context::Transaction->begin();
my $rv = $tb->subtest($name, $subtests, @args);
$tx->rollback;
return $rv;
};
1;
|