Steve Lamb wrote: > 2: Can you provide an example of such free-style coding that you speak > so highly of?
# Split header into separate header lines, dropping any unneeded or # spurious header lines: @header_lines = grep( ( /^(?: # Wanted headers: X-Spam-Status ):/ix or !/^(?: # Unwanted headers: Delivered-To | Path | Priority | Received | Return-Path | (?: # Prefixes: List | X )-[\w-]+ ):/ix ), split(/\n(?!\s)/, $header_unwrapped) ); I call that readable, but I guess somebody won't. ;-)