行全体を削除する必要があることを確認するか、
行の問題のある部分を切り取ります。使用している正規表現エンジンの種類がわかりません。より良い結果を得るには、少なくとも否定的な後読みと後方参照が必要です。
圧縮検証:
/^(?=(Set-Cookie:\s*))(?:\1|.*?;\s*)(?:__[a-z]+|__utma_a2a|has_js|Drupal\.toolbar\.collapsed|MNO_abc_qrst_\d+)=[^;]*(?:;|$).*$/s
圧縮されたグローバル パーツの置換:
s/(?:(?<=^Set-Cookie:)|(?<=;))\s*(?:__[a-z]+|__utma_a2a|has_js|Drupal\.toolbar\.collapsed|MNO_abc_qrst_\d+)=[^;]*(?:;|$)//g
(Perl での) 正規表現の拡大図:
my $str = 'Set-Cookie: MNO_abc_qrst_80=aaaaaaaaa2a5882045525d5a4a58455e445a4a423660;expires=Fri, 12-Aug-2011 17:23:23 GMT;path=/;httponly';
## Validate part of a cookie, remove line
if ( $str =~ /
^ (?= (Set-Cookie: \s*))
(?: \1
| .*? ; \s*
)
(?: __[a-z]+
| __utma_a2a
| has_js
| Drupal\.toolbar\.collapsed
| MNO_abc_qrst_\d+
)
=
[^;]*
(?: ; | $)
.* $
/sx )
{
print "Valid, remove line '$&'\n=============\n\n";
}
## Globally, replace many parts of the cookie
if ( $str =~ s/
(?: (?<= ^ Set-Cookie:)
| (?<= ;)
)
\s*
(?: __[a-z]+
| __utma_a2a
| has_js
| Drupal\.toolbar\.collapsed
| MNO_abc_qrst_\d+
)
=
[^;]*
(?: ; | $)
//xg )
{
print "removed parts of cookie\n";
print "new string = '$str'\n";
}
出力:
Valid, remove line 'Set-Cookie: MNO_abc_qrst_80=aaaaaaaaa2a5882045525d5a4a58455e
445a4a423660;expires=Fri, 12-Aug-2011 17:23:23 GMT;path=/;httponly'
=============
removed parts of cookie
new string = 'Set-Cookie:expires=Fri, 12-Aug-2011 17:23:23 GMT;path=/;httponly'