免费注册 查看新帖 |

Chinaunix

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

perl如何得到一个字符 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2010-12-16 14:36 |只看该作者 |倒序浏览
<>是行输入的,我想不要回车,输入一个字符如“y/n”就可以,这个怎么实现?

论坛徽章:
78
双子座
日期:2013-10-15 08:50:09天秤座
日期:2013-10-16 18:02:08白羊座
日期:2013-10-18 13:35:33天蝎座
日期:2013-10-18 13:37:06狮子座
日期:2013-10-18 13:40:31双子座
日期:2013-10-22 13:58:42戌狗
日期:2013-10-22 18:50:04CU十二周年纪念徽章
日期:2013-10-24 15:41:34巨蟹座
日期:2013-10-24 17:14:56处女座
日期:2013-10-24 17:15:30双子座
日期:2013-10-25 13:49:39午马
日期:2013-10-28 15:02:15
2 [报告]
发表于 2010-12-16 15:01 |只看该作者
一个字也是一行,去除回车用chomp

论坛徽章:
0
3 [报告]
发表于 2010-12-16 15:13 |只看该作者
回复 1# better0332

  @a=();
push(@a,$_);
    last if $#a==0;

论坛徽章:
0
4 [报告]
发表于 2010-12-16 17:22 |只看该作者
perldoc -f getc

论坛徽章:
0
5 [报告]
发表于 2010-12-16 18:16 |只看该作者
看了下getc,
关键是
system "stty cbreak </dev/tty >/dev/tty 2>&1";
linux,cygwin下ok,但win32下没有stty,咋办?

论坛徽章:
0
6 [报告]
发表于 2010-12-16 18:34 |只看该作者
哦,faq8中有
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

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

清除 Cookies - ChinaUnix - Archiver - WAP - TOP