我有一个名为“玩家”的数组。 然后我通过以下方式推送连接到服务器的每个套接字:
interface 123
item1
item2
item3
interface 456
item5
item6
item7
card 477
something foo
somethig bar
我使用此方法搜索其他套接字:
my @idx = grep { $lines[$_] =~ /^interface/ } 0..$#lines;
for my $i (0..$#idx-1) {
say "Interface:";
say "\t$_" for @lines[$idx[$i]..$idx[$i+1]-1];
}
# The last interface section stops at the first unindented line
say "Interface:";
for my $i ($idx[-1] .. $#lines) {
last if $lines[$i] =~ /^\S/ and $lines[$i] !~ /^interface/;
say "\t$lines[$i]";
}
但是有人告诉我这种方法不合适,我应该这样做:
players.push(socket);
但是我不明白这一点,请有人为我解释:) 谢谢,抱歉我的英语不好
* uniqid()生成随机字符串。