mirror of
https://github.com/ossrs/srs.git
synced 2025-02-15 04:42:04 +00:00
21 lines
274 B
Perl
21 lines
274 B
Perl
package OpenSSL::Glob;
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use File::Glob;
|
|
|
|
use Exporter;
|
|
use vars qw($VERSION @ISA @EXPORT);
|
|
|
|
$VERSION = '0.1';
|
|
@ISA = qw(Exporter);
|
|
@EXPORT = qw(glob);
|
|
|
|
sub glob {
|
|
goto &File::Glob::bsd_glob if $^O ne "VMS";
|
|
goto &CORE::glob;
|
|
}
|
|
|
|
1;
|
|
__END__
|