>>466
SetEnvIf ですか、、、。

だったら、Perl 内でやるほうが汎用的な気がするですね。