How about this:
It is best to put "" around a variable reference to avoid interpretation by the shell, but in the case of a string the $ characters would still be interpreted so you have to use single quotes.
( $sandy got interpretated as a variable which is empty )
How to emulate grep -o option in perl.
I mean to print not all line, only the exact match.
echo "2A2 BB" | perl -ne 'print if /2A2/'
2A2 BB
I want to print only 2A2. (2 Replies)
Hi
By using select clause I'm trying to pull out the rows to a variable.
If the variable has 0 row(s) selected then i'm printing some text message
else printing some other text message
if($xyz =~ m/0 row/)
{
print "0 rows ";
}
else
{
print " There are rows";
}
By my problem... (4 Replies)
I am trying to match a pattern exactly in a shell script. I have tried two methods
awk '/\<mpath${CURR_MP}\>/{print $1 $2}' multipath
perl -ne '/\bmpath${CURR_MP}\b/ and print' /var/tmp/multipath
Both these methods require that I use the escape character. I am guessing that is why... (8 Replies)
I have a file that contains the 2 following lines (from /proc/mounts)
/dev/sdc1 /mnt/backup2 xfs rw,relatime,attr2,noquota 0 0
/dev/sdb1 /mnt/backup xfs rw,relatime,attr2,noquota 0 0
I need to match the string in the second column exactly so that only one result is returned, e.g.
> grep... (2 Replies)
Hello,
My requirement is to iterate over all the lines of a file and compare them with a word and perform some operations if exact match is found.
For the snippet below, it works even if contents of line include "diff" and "diff:". I want it to work only if it is exactly "diff" and is not... (2 Replies)
i have a script in which i need to skip comments, and i am able to achieve it partially...
IN text file:
{****************************
{test : test...test }
Script:
while (<$fh>)
{
push ( @data, $_);
}
if ( $data =~ m/(^{\*+$)/ ){
}
With the above match i am... (5 Replies)
Hi,
I'm trying to match the front and back of a sequence. It works when there is an exact match (obviously), but I need the regex to be more flexible. When we get strings of nucleotides sometimes their prefixes and suffixes aren't exact matches. Sometimes there will be an extra letter and... (2 Replies)
Hi experts,
I have a file with regexes which is used for automatic searches on several files (40+ GB).
To do some postprocessing with the grep result I need the matching line as well as the match itself.
I know that the latter could be achieved with grep's -o option. But I'm not aware of a... (2 Replies)
Hi All,
We have this regex:\\*.*?(.600).*?.(LISTEN|ESTABLISHED)
OS = Solaris 10
The purpose of this regex is to match the ports in output of "netstat -an" and report if any ports between 6000-6009 are getting used. The only problem is if I have something like this (sample output as... (6 Replies)
I am trying to create a cronjob that will run on startup that will look at a list.txt file to see if there is a later version of a database using database.txt as the source. The matching lines are written to output.
$1 in database.txt will be in list.txt as a partial match. $2 of database.txt... (2 Replies)
Discussion started by: cmccabe
2 Replies
LEARN ABOUT DEBIAN
log::agent::driver::mail
Agent::Driver::Mail(3pm) User Contributed Perl Documentation Agent::Driver::Mail(3pm)NAME
Log::Agent::Driver::Mail - email driver for Log::Agent
SYNOPSIS
use Log::Agent;
require Log::Agent::Driver::Mail;
my $driver = Log::Agent::Driver::Mail->make(
-to => 'oncall@example.org',
-cc => [ qw( noc@example.org admin@example,net ) ],
-subject => "ALERT! ALERT!",
-mailer => [ 'smtp', Server => 'mail.example.net' ]
);
logconfig(-driver => $driver);
DESCRIPTION
This driver maps the logxxx() calls to email messages. Each call generates a separate email message. The Mail::Mailer module is required.
CONSTRUCTOR
make OPTIONS
The OPTIONS argument is a hash with the following keys:
-prefix An optional prefix for the message body.
-to The destination addresses, may be a scalar containing a valid email address or a reference to an array of addresses.
-reply_to
The reply-to addresses, may be a scalar containing a valid email address or a reference to an array of addresses.
-from The source address, must be a scalar containing a valid email address.
-subject
The subject line of the email message.
-cc The carbon copy addresses, may be a scalar containing a valid email address or a reference to an array of addresses.
-bcc The blind carbon copy addresses, may be a scalar containing a valid email address or a reference to an array of addresses.
-priority
The priority level for the email message. This is NOT related to the logging priority.
-mailer A reference to an array containing the optional arguments to Mail::Mailer->new(). Generally, this can be omitted.
NOTES
Thanks to Shirley Wang for the idea for this module.
AUTHOR
Mark Rogaski <mrogaski@pobox.com>
LICENSE
Copyright (C) 2002 Mark Rogaski; all rights reserved.
See Log::Agent(3) or the README file included with the distribution for license information.
SEE ALSO
Mail::Mailer, Log::Agent::Driver(3), Log::Agent(3).
perl v5.10.0 2002-05-12 Agent::Driver::Mail(3pm)