* Jose Kahan wrote:
[adding d...@]
> I didn't do my homework completely. According to
> RFC 2910, Cookie tokens may be separated by
> white space. The correct regular expression is:
>
> [[
> SetEnvIf Cookie "language\s*=\s*([a-z|A-Z][a-z|A-Z|-]+)"
> prefer-language=$1 ]]
Also, why are you allowing pipe characters within the language spec? ;-)
How about simply:
language\s*=\s*([a-zA-Z-]+)
?
Maybe
language\s*=\s*([^;,\s]+)
is even better (more flexible). dunno.
nd
--
my @japh = (sub{q~Just~},sub{q~Another~},sub{q~Perl~},sub{q~Hacker~});
my $japh = q[sub japh { }]; print join #########################
[ $japh =~ /{(.)}/] -> [0] => map $_ -> () # André Malo #
=> @japh; # http://pub.perlig.de/ #