Правка cookies средствами встроенного perl

[Bokhan Artem]

несколько не по теме: может правильней будет передавать конкретные нужные 
бэкенду куки, а не вырезать ненужные? ($cookie_name, эта переменная равна cookie 
name; )

Олег Черній пишет:
> Здравствуйте.
> 
> Недавно возникла необходимость один из сабдоменов основного сайта
> завернуть на apache партерского сайта. Этот раздел не очень посещаем,
> так что решили (чтоб не было утечки сессий) сделать проксирование на
> сайт партнера при этом чистить куки приблизительно таким способом:
> 
> server {
>     ...
>     set  $cookie_cropped  $http_cookie;
>     if ($http_cookie ~* "(.*)(MyKey=[^;]+(;*|$))(.*)" ) {
>         set $cookie_cropped  $1$4;
>     }
> 
>     location / {
>          ...
>          proxy_set_header  Cookie     $cookie_cropped;
>     }
> }
> 
> Сейчас есть необходимость чистить несколько куков. Может существует
> более красивое и простое решение (например встроеный perl)?
>