Christopher Juckins

SysAdmin Tips, Tricks and other Software Tools

User Tools

Site Tools


sending_email

This is an old revision of the document!


Sending email

#!/usr/bin/perl -w

$sysadmin = "user\@domain.com";
$script_name = "test";
$archive_data_dir = "/a/b/c"; 
$latest_file_download = `ls -1 $archive_data_dir| tail -n 1`;

now();
`echo '$now\n\nLast saved file: $latest_file_download' | mailx -s '$script_name.pl reports stale source files' $sysadmin`;

sub now {
  $now = `date`;
  chomp($now);
}
sending_email.1587419021.txt.gz · Last modified: 2020/04/20 17:43 by juckins