$main::mailTemplate = '/main/etc/mailtemplate.txt'
$main::outputDir = '/main/attachments';
$main::delAddress = 'abc@gmail.com'
$main::delFileName = 'viper1.csv';

my $result = `cat $main::mailTemplate|mutt -s "MAIL TITLE" -a $main::outputDir\/$main::delFileName $main::delAddress`;