#!/usr/bin/perl my $status = 200; if (defined $ENV{"QUERY_STRING"}) { $status = $ENV{"QUERY_STRING"}; } print "HTTP/1.0 ".$status." FooBar\r\n"; print "\r\n";
虫虫下载站 半导体技术网 电子研发网 源码地带 电源技术网 单片机技术网 医疗电子技术 嵌入式系统与单片机
