数组 – 使用Ctrl-Z时仅在Perl脚本中第一次工作

数组 – 使用Ctrl-Z时仅在Perl脚本中第一次工作,第1张

概述作为一名Perl初学者,我正试图从Randal L. Schwartz的“Learning Perl”做一个简单的练习.练习包括从用户输入(< STDIN>)获取元素列表,对其进行排序,并在排序时在屏幕上显示它.列表可以以两种不同的方式输出,使用逗号在同一行上输出,或在不同的行上输出. 我的问题是当我从用户输入获取列表时(在用户完成时在每个元素和Ctrl-Z之间输入),我不能使用< STDIN>再 作为一名Perl初学者,我正试图从Randal L. Schwartz的“Learning Perl”做一个简单的练习.练习包括从用户输入(< STDIN>)获取元素列表,对其进行排序,并在排序时在屏幕上显示它.列表可以以两种不同的方式输出,使用逗号在同一行上输出,或在不同的行上输出.

我的问题是当我从用户输入获取列表时(在用户完成时在每个元素和Ctrl-Z之间输入),我不能使用< STDIN>再次.因此,我无法获得所需输出方法的用户输入.

请放纵,我对所有建议持开放态度,包括如何使用Stack Overflow,因为这是我在这里发表的第一篇文章.

编辑:我在Windows上,在Eclipse中使用EPIC模块.我已经尝试过Crtl-D了.

这是我的代码:

#!/usr/bin/perluse 5.014;use warnings;use utf8;print "Enter the List you want to sort.";print "Type each element followed by <Enter>.\n";print "Type <Ctrl-Z> when you are done:\n";my @List = <STDIN>;@List = sort @List;print "Do you want the elements to be printed on indivIDual lines [i] or on the same line [s]?\n";chomp (my $userChoice = <STDIN>);if ($userChoice eq "i"){    foreach (@List)    {        print $_;    }}else{    chomp(@List);            print shift @List;    foreach (@List)    {        print "," . $_;    }}
解决方法 问题来自EPIC或Eclipse.如果我在windows控制台中运行我的代码,一切都很好.我必须使用Ctrl-Z Enter.感谢@Сухой27的评论. 总结

以上是内存溢出为你收集整理的数组 – 使用Ctrl-Z时仅在Perl脚本中第一次工作全部内容,希望文章能够帮你解决数组 – 使用Ctrl-Z时仅在Perl脚本中第一次工作所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错,欢迎将内存溢出网站推荐给程序员好友。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/langs/1233099.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-06-06
下一篇 2022-06-06

发表评论

登录后才能评论

评论列表(0条)

保存