in reply to Using system with mailx
I added the uuencode in case you wanted it as an attachment and not just body text. I am pretty sure that at least one mailer module (Net::SMTP) comes standard with the Perl CORE though?#!/usr/bin/perl -w use strict; my $subject = 'test message'; my $address = 'email@address.com'; my $file = '/opt/autotree/autouser/out/chk_cal_date.out; my $status = system("cat $file | mailx -s \"$subject\" $address"); #my $status = system("uuencode $file $file | mailx -s \"$subject\" $ad +dress"); warn "Mailer exited with error: $?" unless $status == 0;
Cheers - L~R
|
|---|