open my $FH, "<$LOGFILE" or die "Failed to open $LOGFILE"; while ($LINE = <$FH>) { push @contents, $LINE; } close $FH; print LOG "$FORMATTEDTIME @contents \n"; my @args = ("/home/admin/bin/email.ksh", "@contents", "Web Server Issue", "PROD", "/home/admin/logs/check_jvm/EmailAlert.log"); system(@args) == 0 or die "system @args failed: $?"