perl - perl mason で ARGS に値を追加する

Question

リダイレクト呼び出しでパラメーターとして渡す前に、ARGS に値を追加したいと考えています。

私は試した

%ARGS{session-id} = 'value1';

構文エラーが発生します。すぐに提案してください。また、名前にハイフンを含むキーは使用できませんか? そうでない場合、リダイレクト先のコンポーネントが %ARGS からの「セッション ID」を期待しているため、それをリダイレクト呼び出しに渡す方法はありません。

Answer 1

使用する

$ARGS{'session-id'} = 'value1';

session-idPerl では有効な識別子ではありません。ハッシュ キーは、有効な識別子である場合にのみ引用符なしで使用できます。

また、$ハッシュの 1 つの要素にアクセスするときに、シジル (変数名の前にある逆参照文字) として使用します。@ハッシュの複数の要素にアクセスするとき。ハッシュ全体に%アクセスする場合のみ (または Perl 5.20 以降では、ハッシュの一部のキーと値の両方にアクセスする場合)。