我必须避免所有的循环，像“for”，foreach“，而这是我的练习，从我的实验室，我找不到一个办法解决这个，因为我是新的Perl。
在C中，生成这个数组将很容易，但我不知道如何在Perl中做。
my @rand = map { rand } ( 1..100 );
但地图只是一个循环与花哨的修饰。
如果你需要做100次的事情，你将需要使用某种迭代结构。
