免费注册 查看新帖 |

Chinaunix

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

请教问题 谢谢 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2006-11-25 00:12 |只看该作者 |倒序浏览
请问在win下 怎么在命令行下执行perl脚本阿 谢谢

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
2 [报告]
发表于 2006-11-25 08:05 |只看该作者
把你的 Perl 脚本保存成 .pl 后缀的文件,然后输入文件名就可以了。
另外,通过修改 PATHEXT 环境变量,也可以不输入扩展名来运行。环境变量在我的电脑属性中修改。

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
3 [报告]
发表于 2006-11-25 08:13 |只看该作者

  1. D:\MoChou>echo %PATHEXT%
  2. .COM;.EXE;.BAT;.CMD;.VBS;.VBE;.JS;.JSE;.WSF;.WSH;.PL

  3. D:\MoChou>gvim ttt.pl

  4. D:\MoChou>cat ttt.pl
  5. use strict;
  6. use warnings;
  7. use POE;

  8. POE::Session->create(
  9.     inline_states => {
  10.         _start  => \&start,
  11.         counter => \&counter,
  12.         _stop   => \&stop,
  13.     }
  14. );

  15. sub start {
  16.     my ($kernel, $heap, $session) = @_[ KERNEL, HEAP, SESSION ];

  17.     print "session ", $session->ID, " start...\n";
  18.     $heap->{count} = 0;
  19.     $heap->{max} = 10;

  20.     $kernel->yield( 'counter' );
  21. }

  22. sub counter {
  23.     my ($kernel, $heap) = @_[ KERNEL, HEAP ];
  24.     print $heap->{count}++, "\n";
  25.     if ( $heap->{count} < $heap->{max} ){
  26.         $kernel->yield( 'counter' );
  27.     }
  28. }

  29. sub stop {
  30.     my $session = $_[ SESSION ];

  31.     print "session ", $session->ID, " stop.\n";
  32. }

  33. print "开始运行\n";
  34. POE::Kernel->run;

  35. D:\MoChou>ttt
  36. session 2 start...
  37. 开始运行
  38. 0
  39. 1
  40. 2
  41. 3
  42. 4
  43. 5
  44. 6
  45. 7
  46. 8
  47. 9
  48. session 2 stop.

  49. D:\MoChou>
复制代码

论坛徽章:
0
4 [报告]
发表于 2006-11-25 13:40 |只看该作者
cat不是linux的命令吗?? 还有gvim是啥命令? 不怎么懂   不过还是得谢谢你~

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
5 [报告]
发表于 2006-11-25 13:53 |只看该作者
原帖由 murmur 于 2006-11-25 13:40 发表
cat不是linux的命令吗??
  1. D:\MoChou>cat cat.pl
  2. print while(<>);

  3. D:\MoChou>
复制代码
原帖由 murmur 于 2006-11-25 13:40 发表
还有gvim是啥命令?

http://www.vim.org/
http://www.vim.org/download.php#pc
ftp://ftp.vim.org/pub/vim/pc/gvim70.exe

论坛徽章:
33
荣誉会员
日期:2011-11-23 16:44:17天秤座
日期:2014-08-26 16:18:20天秤座
日期:2014-08-29 10:12:18丑牛
日期:2014-08-29 16:06:45丑牛
日期:2014-09-03 10:28:58射手座
日期:2014-09-03 16:01:17寅虎
日期:2014-09-11 14:24:21天蝎座
日期:2014-09-17 08:33:55IT运维版块每日发帖之星
日期:2016-04-17 06:23:27操作系统版块每日发帖之星
日期:2016-04-18 06:20:00IT运维版块每日发帖之星
日期:2016-04-24 06:20:0015-16赛季CBA联赛之天津
日期:2016-05-06 12:46:59
6 [报告]
发表于 2006-11-25 23:53 |只看该作者
原帖由 flw 于 2006-11-25 13:53 发表

  1. D:\MoChou>cat cat.pl
  2. print while(<>);

  3. D:\MoChou>
复制代码


http://www.vim.org/
http://www.vim.org/download.php#pc
[url]ftp://ftp.vim.org/pub/vim/pc/g ...



偶要真正Windows本地版的, cat, grep, find, sort. 要不?

论坛徽章:
0
7 [报告]
发表于 2006-11-26 00:38 |只看该作者
谢谢 朋友的耐心解答 gvim我安装了 不怎么会用 不过像是linux下的vi编辑器
怪我没有说清楚我的问题 我现在是xp系统 安装了php5 并且执行了go-pear.bat这个批处理文件 显示成功安装
我不清楚 我现在是否具备了运行perl的环境 在安装目录下也发现类似网上说的perl.exe的文件 我以前没有学过perl
对这种语言一无所知 所以现在一头雾水

论坛徽章:
0
8 [报告]
发表于 2006-11-26 03:22 |只看该作者
你装了perl吗?

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
9 [报告]
发表于 2006-11-26 09:36 |只看该作者
原帖由 q1208c 于 2006-11-25 23:53 发表

偶要真正Windows本地版的, cat, grep, find, sort. 要不?

呵呵,我也有的。不过为了不至于迷惑那位朋友,我才故意这么说的。
把学生的注意力从不相干的主题上吸引回来是教育工作者的基本素质。
这个帖子到底是讨论 Perl 如何用的?还是 cat 是哪儿来的?

论坛徽章:
1
2015年辞旧岁徽章
日期:2015-03-03 16:54:15
10 [报告]
发表于 2006-11-26 09:48 |只看该作者
原帖由 murmur 于 2006-11-26 00:38 发表
谢谢 朋友的耐心解答 gvim我安装了 不怎么会用 不过像是linux下的vi编辑器
怪我没有说清楚我的问题 我现在是xp系统 安装了php5 并且执行了go-pear.bat这个批处理文件 显示成功安装
我不清楚 我现在是否具备了运 ...

你安装一下这个:
ftp://www.activestate.com/Active ... in32-x86-267479.msi

BTW:Perl 不是 PHP 的赠品,因此想要学 Perl,首先得安装 Perl。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP