当前时区为 UTC + 8 小时



发表新帖 回复这个主题  [ 2 篇帖子 ] 
作者 内容
1 楼 
 文章标题 : [求助]binmode这个究竟怎么用?
帖子发表于 : 2010-04-27 21:53 

注册: 2006-02-12 19:29
帖子: 512
送出感谢: 1
接收感谢: 0 次
代码:
#!/usr/bin/perl -wT
use strict;
my $image_type = $ENV{HTTP_ACCEPT} =~ m|image/png| ? "png" : "jpeg";
my( $basename ) = $ENV{PATH_INFO} =~ /^(\w+)/;
my $image_path = "$ENV{DOCUMENT_ROOT}/images/$basename.$image_type";
unless ( $basename and -B $image_path and open IMAGE, $image_path ) {
print "Location: /errors/not_found.html\n\n";
exit;
}
my $buffer;
print "Content-type: image/$image_type\n\n";
binmode;
while ( read( IMAGE, $buffer, 16_384 ) ) {
print $buffer;
}


上面就是例程了。结果我使用的时候提示脚本错误。提示是在binmode这里出错。


页首
 用户资料  
 
2 楼 
 文章标题 : Re: [求助]binmode这个究竟怎么用?
帖子发表于 : 2010-04-27 22:55 

注册: 2009-10-13 22:58
帖子: 56
送出感谢: 0 次
接收感谢: 0 次
binmode IMAGE;


页首
 用户资料  
 
显示帖子 :  排序  
发表新帖 回复这个主题  [ 2 篇帖子 ] 

当前时区为 UTC + 8 小时


在线用户

正在浏览此版面的用户:没有注册用户 和 1 位游客


不能 在这个版面发表主题
不能 在这个版面回复主题
不能 在这个版面编辑帖子
不能 在这个版面删除帖子
不能 在这个版面提交附件

前往 :  
本站点为公益性站点,用于推广开源自由软件,由 DiaHosting VPSBudgetVM VPS 提供服务。
我们认为:软件应可免费取得,软件工具在各种语言环境下皆可使用,且不会有任何功能上的差异;
人们应有定制和修改软件的自由,且方式不受限制,只要他们自认为合适。

Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
简体中文语系由 王笑宇 翻译