Here is where I am in the process: I have MIME::Lite located on the server in a folder called /home/samcsm/jcorbett/myperl/lib I use this simple script to test out emailing a query below and get the error stating that "cannot find MIME/Lite.pm' anywhere. Now mind you I have MIME/Lite.pm installed in /home/samcsm/jcorbett/myperl/lib/perl5/site_perl/MIME/Lite.pm Can you tell me whats wrong?
#!/usr/bin/perl use warnings; use strict; use DBI; use MIME::Lite; BEGIN{ unshift (@INC, '/home/samcsm/jason/myperl/lib/perl5/site_perl/MIME/Lite.pm');} $ENV{"ORACLE_HOME"}="/orav101/oracle/8.0.6"; #Gather data for connecting to database: our ($sql); our ($sth); our ($dbh); our (@record); our (@files); our ($filename); our ($recordlist); our $database_temp="dbi:Oracle:#####"; our $username="#####"; our $passwd="#####"; $dbh = DBI->connect($database_temp, $username, $passwd) or $dbh->{RaiseError} = 1; #Set up your sql statement that you want to run in Oracle $sql=qq( select * from bill where rownum <100); $sth=$dbh->prepare($sql); #Execute the SQL statememt $sth->execute(); while(@record= $sth->fetchrow_array()) { $recordlist=join("|",@record); } $sth->finish; $dbh->disconnect; my $message=MIME::Lite->new( From: =>'[EMAIL PROTECTED]', To: =>'[EMAIL PROTECTED]', Subject: =>'This is a test of the MIME::Lite Mod', Data =>$recordlist ); $message->send; /home/samcsm/jcorbett/myperl/lib/perl5/site_perl/MIME/Lite.pm