package SecurityV1; BEGIN { my $LoadModule = ($^O ne 'MSWin32') ? 'UnixSecurity' : 'Win32Security'; eval "require $LoadModule; 1;" or die $@ if $LoadModule; $LoadModule->import(); } use strict; use warnings; use constant { TRUE => 1, FALSE => 0 }; use Exporter; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK ); our $VERSION = 1.00; our @ISA = qw(Exporter); @EXPORT = qw(); @EXPORT_OK = qw(); Test(); 1;