我想把一个数组里面的元素一个一个读出来。这些元素分别是14位2进制数构成。原始数组 @src_matrix 内容如下: 10101010000011 10010000101110 01010101010000 11110000001110 .... 但数组的元素个数不固定。我将每一个元素读出来以后,需要分别将这一个元素中的每一个2进制数与一个对应的变量相乘并相加。比如,变量为b0,b1,..b13。那么第一行结果应该为 b0+b2+b4+b6+b12+b13. 这就需要将元素中的每一个2进制数据独立出来。 针...
在perl里可以使用这样的代码得到一个数组的长度 $length = @array; 虽然关联数组的定义更像是map,但是一个数组可以直接赋值给一个关联数组, 但使用上面的方法无法得到数组的长度。 请问是否一个关联数组没有长度,因为它是一个map?如果有,怎么得到它的长度?
我在网上看到的教程里讲数组的范围可以这样表示 用于实数 (2.1..5.3) = (2.1, 3.1 ,4.1, 5.1) 原文: http://www.itlearner.com/code/perl/perl4.htm 我写了这样一段代码 @test = (2.1..5.3); print ("@test \n"); 结果输出是 2 3 4 5 这是为什么?是因为perl的版本问题吗? 我用的是Activeperl 5.10.0 和DzSoft Editor 5.8.4
#!/usr/bin/perl sub verifych { my($chsys,$ch)=@_; ##$chsys 是一个数组的地址 foreach $i (@$chsys) #@$chsys { #print($i); $i=~s/^.*: //; $i=~s/\s//g; #print ($i); if("$i" eq "$ch") {return 0;} } return 1; } @a=`smcli lssys -A Description -n dtx201.csst.com`; ##smcli lssys -A Description -n dtx201.csst.com ...
请教各位高手。 现在有一个TXT日志文件,如下: 10.1.0.1 asdfasdfasdfasdfasdfasdfasdfasdfasdf ""usrname" 11.12.13.11............ 10.1.1.10........... .......... 这个文件一共90万行 现在想从文件中取出每一行最前的IP地址和最后的用户名。 然后统计出这个IP在日志中出现过多少次,和对应的用户名出现过多少次。 用perl怎么来实现啊?请各位高手,赐教。谢谢 下面是我写的一点,但这样做太慢。请高手指教。急。。。。 o...
foreach $desc (@ret) { ($oid, $desc) = split(':', $desc, 2); my %hash = ( oid =>;$oid, desc =>;$desc, ip =>;-1 ); push(@row_arrar,{%hash}); print $hash{'oid'}; 这样在hashi中的oid值怎么都不能打印,请问是什么问题
其实应该就是二维数组,但是麻烦在于,列并不定长, 大约这样的实现( 1,2,3,(a,v,女优)... ),初始状态下并不知道行有多大,列有多长,所以以普通方式创建好像也办不到, 请教各位,如何来实现