Должна ли работать такая конструкция

[Saniek]

Пытаюсь разбраться с perl. 
Нужно в perl обработать переменную и
передать ее в  nginx.
Использую такую конструкцию:
location {
...
set $sid 0;
perl  session::gen;
echo $sid;
....
}

perl:
...
sub gen
{
    my $r = shift;
    $r->variable('sid', 'asdasdasd');
    return OK;
}

Можно ли так делать и, если нет, то как
можно? 
Вообще надо чтобы переменные брались
из location и туда же отдавались, поэтому
perl_set не подходит.
Спасибо за помощь.

Posted at Nginx Forum: http://forum.nginx.org/read.php?21,224522,224522#msg-224522