免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 2958 | 回复: 8
打印 上一主题 下一主题

请问linux下用perl print 一个叫6.gif的图片该如何写? [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2008-10-15 10:25 |只看该作者 |倒序浏览
5可用积分
我在网站搜索了一下,还是没有搞定.请高手指教.如果实现print 6.gif 比较难,能实现print 一个叫6.jpg的文件也行.

最佳答案

查看完整内容

那需要调用外部程序打开这个图片 例如画图板

论坛徽章:
0
2 [报告]
发表于 2008-10-15 10:25 |只看该作者

回复 #3 surezj 的帖子

那需要调用外部程序打开这个图片 例如画图板

论坛徽章:
0
3 [报告]
发表于 2008-10-15 12:49 |只看该作者
不太明白你的意思 是要生成一副图片?下面是将图像数据写入一个图片文件的代码
open(FH,"+>",$image_url) or die "can't open $image_url: $!";
print FH $image_file or die "can't print $image_file: $!";
close FH;

论坛徽章:
0
4 [报告]
发表于 2008-10-15 12:54 |只看该作者

回复 #2 hfahe 的帖子

谢谢.我自己有幅图片,如"6.gif",我想在perl 中调用并把它显示在屏幕上.

论坛徽章:
0
5 [报告]
发表于 2008-10-15 17:48 |只看该作者
原帖由 surezj 于 2008-10-15 12:54 发表
谢谢.我自己有幅图片,如"6.gif",我想在perl 中调用并把它显示在屏幕上.

#!/usr/bin/perl

use warnings;
use strict;

system('6.gif');

论坛徽章:
0
6 [报告]
发表于 2008-10-15 18:37 |只看该作者

回复 #4 redspider 的帖子

#!/usr/bin/perl

use warnings;
use strict;

system('6.gif');

use: command not found 这个错误如何解决?
.....................................................................................................
./fd12*1: line 5: use: command not found
./fd12*1: line 6: use: command not found
./fd12*1: line 8: syntax error near unexpected token `'6.gif''
./fd12*1: line 8: `system('6.gif');'

论坛徽章:
0
7 [报告]
发表于 2008-10-15 19:20 |只看该作者
原帖由 redspider 于 2008-10-15 17:48 发表

#!/usr/bin/perl

use warnings;
use strict;

system('6.gif');




怎么使用,能说的明白些吗?

论坛徽章:
0
8 [报告]
发表于 2008-10-15 19:30 |只看该作者
  这个代码是在 windows 上运行的,不过我习惯在前面加上 #!/usr/bin/perl

论坛徽章:
0
9 [报告]
发表于 2008-10-15 20:07 |只看该作者
原帖由 redspider 于 2008-10-15 19:30 发表
  这个代码是在 windows 上运行的,不过我习惯在前面加上 #!/usr/bin/perl




我说在linux图形界面下怎么没有反应,
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP