package t:Util use strict; use warnings; use Test::More; use Test::TCP; use Proc::Guard qw(proc_guard); use LWP::UserAgent; sub nginx_start { my ($class, $conf_name) = @_; $conf_name ||= "basic.nginx.conf"; my $pwd = `pwd`; chomp $pwd; my $nginx_bin = $ENV{'NGINX_BIN'} or die "please specify ENV NGINX_BIN"; my $proc = proc_guard($nginx_bin, '-g', 'daemon off;', '-p', $pwd . '/t/ngx_base/', '-c', $
![nginxの挙動を確認するためのプログラムを書く - Qiita](https://cdn-ak-scissors.b.st-hatena.com/image/square/665df605ab72b19d0c04546d03598fc820b74103/height=288;version=1;width=512/https%3A%2F%2Fqiita-user-contents.imgix.net%2Fhttps%253A%252F%252Fcdn.qiita.com%252Fassets%252Fpublic%252Farticle-ogp-background-9f5428127621718a910c8b63951390ad.png%3Fixlib%3Drb-4.0.0%26w%3D1200%26mark64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTkxNiZoPTMzNiZ0eHQ9bmdpbnglRTMlODElQUUlRTYlOEMlOTklRTUlOEIlOTUlRTMlODIlOTIlRTclQTIlQkElRTglQUElOEQlRTMlODElOTklRTMlODIlOEIlRTMlODElOUYlRTMlODIlODElRTMlODElQUUlRTMlODMlOTclRTMlODMlQUQlRTMlODIlQjAlRTMlODMlQTklRTMlODMlQTAlRTMlODIlOTIlRTYlOUIlQjglRTMlODElOEYmdHh0LWNvbG9yPSUyMzIxMjEyMSZ0eHQtZm9udD1IaXJhZ2lubyUyMFNhbnMlMjBXNiZ0eHQtc2l6ZT01NiZ0eHQtY2xpcD1lbGxpcHNpcyZ0eHQtYWxpZ249bGVmdCUyQ3RvcCZzPWM1YWU4OGYxMTA0NWJmNTcyZDRjYTk0MTczYTI4MTU2%26mark-x%3D142%26mark-y%3D112%26blend64%3DaHR0cHM6Ly9xaWl0YS11c2VyLWNvbnRlbnRzLmltZ2l4Lm5ldC9-dGV4dD9peGxpYj1yYi00LjAuMCZ3PTYxNiZ0eHQ9JTQwd2FsZjQ0MyZ0eHQtY29sb3I9JTIzMjEyMTIxJnR4dC1mb250PUhpcmFnaW5vJTIwU2FucyUyMFc2JnR4dC1zaXplPTM2JnR4dC1hbGlnbj1sZWZ0JTJDdG9wJnM9YzRjMzljNzc3ODY2OTViYjM3MWE4ZWU2MDFmNDI2MDg%26blend-x%3D142%26blend-y%3D491%26blend-mode%3Dnormal%26s%3Dd9c1cc1e79e9ba654df677ae95f9a208)