in reply to Strange Behavior while Parsing Sendmail logs

hmmm, what about this one: 
$to_addr = $1 if /.+? to=([^,]+), .*/;

[download]

In Section Seekers of Perl Wisdom