Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl -w

...
### Send the Message
MIME::Lite->send('smtp', $mail_host, Timeout=>60);
$msg->send;

Select or download this
```
...
CheckDB.pl
CleanUp.pl
reports.pl
```