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.
