I need to send an attachment and text in the body, both in the same Email.
Below are two cammand that send the required data in separate Emails. I need to combine them so that I get just 1 Email containing the attachment & text in the body.
What is the correct format for a single command that would combine portions of 2 different lines in the command history? I'm using a C shell. Here's a simplified command history to clarify:
4 rm file1
5 ls -ld file2 file3 file4
6 cat file 5
With the above history, what would be the... (5 Replies)
Dear Experts
I am trying to find if it is possible to combine unix commands in awk program. For example if it is possible embed rm or ls or any unix command inside the awk program and while it is reading the file besides printing be able to do some unix commands. I am thinking may be just print... (2 Replies)
I would like to change the lines:
originalline1
originalline2
to:
originalline1new
originalline1newline
originalline2new
originalline2newline
To do this, id like to combine the commands:
sed 's/^/&new/g' file > newfile1
and
sed '/^/ a\\
newline\\
\\ (2 Replies)
Hello all,
I am trying to list and count all the files of a particular type in any given directory. I can use the commands separately but when I combine them they do not give an output.
The command for counting the files is ls -1 | wc -l and for listing all the file of particular type say... (2 Replies)
Is there anyway to achieve "find /home -name "*.bashrc" 2>/dev/null" and "PS1="\n>"" in the same command? I just wanna add a line to the previous command to change the PS1 variable to ">". (1 Reply)
Hi Guys,
I am looking to optimze these 5 SSH lines to a single SSH to get my machine to not hang! lol!
cat hosts.lst | xargs -n1 -t -i echo 'home/util/timeout 6 0 ssh -q {} top -b > util/{}.top &' >> r_query_info
cat hosts.lst | xargs -n1 -t -i echo 'home/util/timeout 6 0 ssh -q {} uname -r... (5 Replies)
hey can anyone tell me how can i combine these two commands so that it is executed only once, but gives me both the results.
IDLE=`sar 30 6 | grep Average | awk '{print $1 $5}' `
sar 30 120 | awk '{print $1" "$5}' >> mailx -m -s "$MSG" xyz@abc.com. (5 Replies)
Hi,
I have a directory with some XML files in it. I can use wildcards to get the list of XMLs I want
say I have following XMLs in same dir
Employee1.xml
Employee2.xml
Employee3.xml
and
Salary1.xml
Salary2.xml
Salary3.xml
apart from other .txt .dat files etc
I want to write a unix... (7 Replies)
I have a directory of 3000 files without extensions (Solaris 5.10).
I would like to iterate the file names through the 'file' command and output their mime types (most are pdf or jpg, but a very few might be psd or swf which show simply as 'data')
So, I would like the output of the 'ls'... (2 Replies)
I can achieve two tasks with 2 different awk commands:
1) awk -F";;WORD" '{print $2}' file | sed '/^$/d' #to find surface_word
2) awk -F"bw:|gloss:" '// {print $2}' file | sed '/\//!d; s:/*+*: + :g; s:^+::; s: *+ *$::;' #to find segmentation of surface_word
Number 1) finds surface_word... (7 Replies)
Discussion started by: Viernes
7 Replies
LEARN ABOUT DEBIAN
test::email
Test::Email(3pm) User Contributed Perl Documentation Test::Email(3pm)NAME
Test::Email - Test Email Contents
SYNOPSIS
use Test::Email;
# is-a MIME::Entity
my $email = Test::Email->new(@lines);
# all-in-one test
$email->ok({
# optional search parameters
from => ($is or qr/$regex/),
subject => ($is or qr/$regex/),
body => ($is or qr/$regex/),
headername => ($is or qr/$regex/),
}, "passed tests");
# single-test header methods
$email->header_is($header_name, $value, "$header_name matches");
$email->header_ok($header_name, $value, "$header_name matches");
$email->header_like($header_name, qr/regex/, "$header_name matches");
# single-test body methods
$email->body_is($header_name, $value, "$header_name matches");
$email->body_ok($header_name, $value, "$header_name matches");
$email->body_like($header_name, qr/regex/, "$header_name matches");
# how many MIME parts does the messages contain?
$email->parts_ok($parts_count, "there were $parts_count parts found");
# what is the MIME type of the firs part
my @parts = $email->parts(); # see MIME::Entity
$parts[0]->mime_type_ok('test/html', 'the first part is type text/html');
DESCRIPTION
Please note that this is ALPHA CODE. As such, the interface is likely to change.
Test::Email is a subclass of MIME::Entity, with the above methods. If you want the messages fetched from a POP3 account, use Test::POP3.
Tests for equality remove trailing newlines from strings before testing. This is because some mail messages have newlines appended to them
during the mailing process, which could cause unnecessary confusion.
This module should be 100% self-explanatory. If not, then please look at Test::Simple and Test::More for clarification.
METHODS
"my $email = Test::Email->new($lines_aref);"
This is identical to "MIME::Entity->new()". See there for details.
"$email->ok($test_href, $description);"
Using this method, you can test multiple qualities of an email message with one test. This will execute the tests as expected and will
produce output just like "Test::Simple::ok" and "Test::More::ok". Keys for $test_href are either "body", or they are considered to be
the name of a header, case-insensitive.
single-test methods
The single-test methods in the synopsis above are very similar to their counterparts in Test::Simple and Test::More. Please consult
those modules for documentation.
Please note that tests for equality remove newlines from their operands before testing. This is because some email messages have
newlines appended to them during mailing.
"my $ok = $email-"parts_ok($parts_count, $description);>
Check to see how many MIME parts this email contains. Each part is also a Test::Email object.
"my $ok = $email-"mime_type_ok($expected_mime_type, $description);>
Check the MIME type of an email or an email part.
EXPORT
None.
SEE ALSO
Test::Builder, Test::Simple, Test::More, Test::POP3
TODO
I am open to suggestions.
AUTHOR
James Tolley, <james@cpan.org>
COPYRIGHT AND LICENSE
Copyright (C) 2007-2008 by James Tolley
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or,
at your option, any later version of Perl 5 you may have available.
perl v5.10.0 2008-10-24 Test::Email(3pm)