#!/usr/bin/perl -w
use Getopt::Long;
use MIME::Lite;
use Win32::Lanman;
use strict;

my $tail = 'C:\Winnt\System32\Tail.exe -50';

my %logs =
    (
 	
    'C:\\LOG\\\LOG1.LOG, 
    
    );