假设我们有以下代码:
#!usr/bin/perl
use strict ;
use warnings ;
sub print_ele_arr{
my @arr = <STDIN> ;
#print the elements of the array here .
#do something else ..
}
print_ele_arr() ;
但我只想将用户输入中的 3 个元素存储到我的 @arr 数组中,如何做到这一点,通常如何限制给定数组的大小?
最佳答案
要只存储 3 行,您可以使用
my $i = 1;
while (defined( my $line = <STDIN>) and $i++ <=3) {
push @arr, $line;
}
至于第二个问题,限制数组的大小是什么意思?您可以使用数组切片来获取数组的前三个元素:
my @first_three = @arr[0 .. 2];
关于perl - 限制数组的大小?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/16882932/