Can anyone help me with a quick PERL question?
Dave Mitchell
davem at iabyn.com
Sat Oct 9 00:17:49 UTC 2004
On Fri, Oct 08, 2004 at 11:38:20PM -0000, James Marcinek wrote:
> First off let me state that I don't want to have to subscribe to a list
> for just one question and I'm assuming that someone out here in this
> technical savy group can help me.
You should try www.perlmonks.org for perl-related questions.
> if ($raw =~
> /(^<\d\d\d>)(\w\w\w)\s+(\d\d)\s+(\d\d\d\d)\s*(\d\d:\d\d:\d\d):\s+(%\w\w\w-\d+-\d+):\s*(\w*$)
That last \w* should be .* instead - you want to match whitespace as well
as alphanumerics.
Also the <\d\d\d> proably wants to be <\d+> - its unlikely ot always be
three digits.
--
This email is confidential, and now that you have read it you are legally
obliged to shoot yourself. Or shoot a lawyer, if you prefer. If you have
received this email in error, place it in its original wrapping and return
for a full refund. By opening this email, you accept that Elvis lives.
More information about the users
mailing list