X7ROOT File Manager
Current Path:
/usr/share/perl5/vendor_perl
usr
/
share
/
perl5
/
vendor_perl
/
📁
..
📁
Algorithm
📁
App
📁
Archive
📁
Authen
📁
B
📁
CPAN
📄
CPAN.pm
(138.01 KB)
📁
Carp
📄
Carp.pm
(30.32 KB)
📁
Config
📁
Data
📁
Date
📁
Digest
📄
Digest.pm
(10.46 KB)
📁
Encode
📄
Env.pm
(5.39 KB)
📁
Error
📄
Error.pm
(24.29 KB)
📄
Expect.pm
(98.09 KB)
📁
Exporter
📄
Exporter.pm
(18.31 KB)
📁
ExtUtils
📄
Fatal.pm
(56.81 KB)
📁
File
📁
Filter
📁
Getopt
📁
Git
📄
Git.pm
(46.95 KB)
📁
HTML
📁
HTTP
📁
IO
📁
IPC
📁
JSON
📁
LWP
📄
LWP.pm
(21.17 KB)
📁
Locale
📁
MRO
📁
Math
📁
Module
📁
Mozilla
📁
Net
📁
POD2
📁
Package
📁
Params
📁
Parse
📁
Perl
📁
PerlIO
📁
Pod
📁
Software
📁
Sub
📁
TAP
📁
Term
📁
Test
📁
Test2
📄
Test2.pm
(6.24 KB)
📁
Text
📁
Thread
📁
Time
📁
Try
📁
Types
📁
WWW
📁
autodie
📄
autodie.pm
(12.58 KB)
📄
bigint.pm
(22.85 KB)
📄
bignum.pm
(20.64 KB)
📄
bigrat.pm
(15.78 KB)
📄
constant.pm
(14.38 KB)
📄
experimental.pm
(6.83 KB)
📁
inc
📁
lib
📁
libwww
📁
local
📄
newgetopt.pl
(2.15 KB)
📄
ok.pm
(967 B)
📄
parent.pm
(2.51 KB)
📄
perldoc.pod
(9.16 KB)
📄
perlfaq.pm
(77 B)
📄
perlfaq.pod
(22.22 KB)
📄
perlfaq1.pod
(14.12 KB)
📄
perlfaq2.pod
(9.24 KB)
📄
perlfaq3.pod
(36.66 KB)
📄
perlfaq4.pod
(87.3 KB)
📄
perlfaq5.pod
(54.21 KB)
📄
perlfaq6.pod
(38.69 KB)
📄
perlfaq7.pod
(36.93 KB)
📄
perlfaq8.pod
(48.93 KB)
📄
perlfaq9.pod
(14.5 KB)
📄
perlglossary.pod
(134.02 KB)
Editing: ok.pm
package ok; our $VERSION = '1.302135'; use strict; use Test::More (); sub import { shift; if (@_) { goto &Test::More::pass if $_[0] eq 'ok'; goto &Test::More::use_ok; } # No argument list - croak as if we are prototyped like use_ok() my (undef, $file, $line) = caller(); ($file =~ /^\(eval/) or die "Not enough arguments for 'use ok' at $file line $line\n"; } __END__ =encoding UTF-8 =head1 NAME ok - Alternative to Test::More::use_ok =head1 SYNOPSIS use ok 'Some::Module'; =head1 DESCRIPTION With this module, simply change all C<use_ok> in test scripts to C<use ok>, and they will be executed at C<BEGIN> time. Please see L<Test::use::ok> for the full description. =head1 CC0 1.0 Universal To the extent possible under law, 唐鳳 has waived all copyright and related or neighboring rights to L<Test-use-ok>. This work is published from Taiwan. L<http://creativecommons.org/publicdomain/zero/1.0> =cut
Upload File
Create Folder