#!/usr/bin/perl -w

my $OsDep = 'File::Copy';
if ($^O =~ /MSWin/i)
{
        $OsDep = "Win32\:\:EventLog";
}
elsif ($^O =~ /Linux/i)
{
        $OsDep = "File\:\:Copy";
}
else
{
        print "Please check documentation for Supported Operating Systems.\n";
}
use $OsDep;