mirror of
https://github.com/openssl/openssl.git
synced 2024-11-21 01:15:20 +08:00
8d2214c0a4
Reviewed-by: Andy Polyakov <appro@openssl.org> (Merged from https://github.com/openssl/openssl/pull/4069)
22 lines
274 B
Perl
22 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__
|