Не запускается с use Digest::MD5 в перловой вставке

alexerm nginx-forum на nginx.us
Пт Окт 22 14:13:36 MSD 2010


В конфигурации хоста есть функция 

[code]
perl_set $rand 'sub {
  use Digest::MD5  qw(md5_hex);
  my $r = shift;
  return md5_hex($r->remote_addr . rand(1000000))
}';
[/code]

В 0.7.65 работает, в 0.7.67 и 0.8.53 не работает.
В логах не пишет ничего конкретного 
[code]
2010/10/22 10:59:03 [error] 17920#0: eval_pv("sub {
  use Digest::MD5 qw(md5_hex);
  my $r = shift;
  return md5_hex($r->remote_addr . rand(1000000));
}") failed in /etc/nginx/conf.d/xxxxxxxxxx.com.conf:5
[/code]

Если убрать use то запускается, но
очевидно что ругается на отсутствие
md5_hex 

Как быть, где копать?

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




Подробная информация о списке рассылки nginx-ru