

#!/usr/bin/perlimage.cgi首先发送MIME头说明(Content-Type),然后读取文件内容并输出。这段程序对$file变量和Content-Type类型略加修改就可以发送声音或影像文件。
$file = "/usr/local/etc/httpd/htdocs/images/picture.gif";
print "Content-Type: image/gif ";
open(GIF,"<$file") || die "Can"t open GIF ";
while (read(GIF,$buffer,16384)) {
print $buffer;
}
相关文章
最新评论共有 0 位网友发表了评论
发表评论
赛酷网·中国西部第一建站门户
阅读排行
最新下载