develooper Front page | perl.perl5.porters | Postings from December 2004

fix for Sys::Syslog

Thread Next
From:
Joshua Richardson
Date:
December 3, 2004 00:07
Subject:
fix for Sys::Syslog
Message ID:
41AFCF05.7@yahoo-inc.com

Hi Nick,

I hope I'm sending this mail to the right person.  I'm using your 
Sys::Syslog module for PERL, and noticed a possible small bug.

When Sys::Syslog constructs the msg to send to syslog, it does

	$mask =~ s/%m/$!/g;

Sometimes we want to send messages that have %m in them, so we escape it 
and create a message like "executing cmd with %%m".  So wondering if you 
would/should change the line to:

	$mask =~ s/(?:^|[^%])%m/$!/g;

Thanks, --josh

----------------- Joshua Richardson -----------------
       Technical Yahoo, Yahoo! Inc., Autos
-------- (408) 349-7676, (408) 205-4417 Cell --------


Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About