如何使用100个随机值在Perl中生成数组,而不使用循环？
我必须避免所有类型的循环,例如"for",foreach",while.这是我的练习,来自我的实验室.我找不到解决这个问题的方法,因为我是Perl的新手.
在C中,生成这个数组非常容易,但我不知道如何在Perl中实现它.
在Perl中,是否可以任意结束map执行,例如last在循环中等效的东西？
它有点像这样:
map {
if (test == true) { last; } dosomething
} @myarray
我想要做的是检查我的搜索字符串的字符串数组并获取相应的键,以便我可以存储它.使用Perl是否有一种神奇的方法,或者我注定要使用循环？如果是这样,最有效的方法是什么？
我对Perl比较新(我只编写了2个其他脚本),所以我还不知道很多魔法,只是Perl是魔术= D
Reference Array: (1 = 'Canon', 2 = 'HP', 3 = 'Sony')
Search String: Sony's Cyber-shot DSC-S600
End Result: 3