????http()??????????IO::Socket::INET??飬?趨????Э???TCPЭ?飬??????????????????????ú????????hash?????????????????????????????get?????????$s->getline()??????????????????÷???????????head ??body??????????????

???????????????

??????????????????????stop()????????????ú??????run()?????????????????$self->{_started}?????0??????÷???

????????????????

???????д???????????Nginx??????????????Nginx???????????????????????????????????????????????????????????????????????????12?????????Test::Nginx??飬18?????????????????????????????????????洢???????$conf?С?20?????write_file_expand()????????nginx??????????????????е?????????25?????http_get()??????????????????30?й?????????

????Perl ?????????

????http://perldoc.perl.org/index-tutorials.html

????http://jianlee.ylinux.org/Computer/Perl/perl_base.html