Re: Константа rand() mod perl

2017-07-05 Пенетрантность Anton Yuzhaninov 
On 01/22/17 00:39, ozz wrote:
> Можно ли и как данную инструкцию вызвать один раз при запуске/перезапуске
> рабочего процесса?
> perl_set $c 'sub { return int(rand(99));}';

Можно (но в каждом рабочем процессе будет свое значение).

Создаем модуль, напимер test.pm

etc/nginx/perl_lib/test.pm

package test;

use warnings;
use strict;
use v5.10;

sub get_number {
state $number = int rand(99);
return $number;
}

1;

В nginx.conf пишем:

perl_modules perl_lib;
perl_require test.pm;

perl_set $number test::get_number;
___
nginx-ru mailing list
nginx-ru@nginx.org
http://mailman.nginx.org/mailman/listinfo/nginx-ru

Константа rand() mod perl

2017-01-21 Пенетрантность ozz 
Приветствую!

Можно ли и как данную инструкцию вызвать один раз при запуске/перезапуске
рабочего процесса?
perl_set $c 'sub { return int(rand(99));}';

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

___
nginx-ru mailing list
nginx-ru@nginx.org
http://mailman.nginx.org/mailman/listinfo/nginx-ru