xxsr.net
当前位置:首页 >> pErl中如何将数组中元素转化成一个字符串 >>

pErl中如何将数组中元素转化成一个字符串

@a = ('P','e','r','l'); $s = join('',@a); print $s;

具体函数我不清楚是否可以直接实现,但是可以通过变相实现。 #!/usr/bin/perl -w use strict; my $string = "China"; my @Array; for(my $i = 0; $i < length($string); $i++){ $Array[$i] = substr($string,$i,1); } for(my $i = 0; $i < @Arra...

$b = [@a]; push @$b, shift @a while @a; 顺便说两句: 这不叫字符串多值, 这叫 Array Reference (数组引用, 引用数组 ... ) Perl 不会将 string 当成 char array 的. perl 没有 char 这种变量形态 如可以, 请避用 $a $b (或 @a @b ) , 这两个变...

my $a= "a,b,c";my @d= split ',', $a; 补充:Perl 最初的设计者为拉里·沃尔(Larry Wall),他于1987年12月18日发表。Perl借取了C、sed、awk、shell scripting以及很多其他程序语言的特性。其中最重要的特性是它内部集成了正则表达式的功能,以及...

$path='C:\Users\' ; #路径opendir D1, "$path" or die $!; @array=grep(!/\.\.?$/, readdir D1); print @array;

可以试一下这几种方式,每种方式各有优劣: #!/bin/perl -w use strict; my @arr = ( "aaa","bbb","ccc","ddd","eee","fff"); # 这个是数组 my $vv = "ddd"; # 这个是要查找的变量 # 方法1,:使用类似c语言的风格,遍历这个数组,查找变量是否匹...

合并数组数组的话: @e= (@a,@c); 结果是:@e= (aa ,bb,cc,ee,ff gg) 如果合并后,个数不变的话按下面做: for (my $i=0;$i>@a;$i++){ $e[$i]=$a[$i].$c[$i]; } 结果是:@e= (aaee,bbff,ccgg) 希望能帮到你埃

$" = "\n"; @arr = (1, 2, 3, 4, 5); open OUT, "> a.txt"; print OUT "@arr"; 数组内插时,分隔符默认$"的值,可以通过修改$"的值来修改如何分割

方法: my @array = (0, 1, 2, 3); print (“@array\n”); #输出有空格,如:0 1 2 3 print (@array, “\n”); #输出没空格,如:0123 哈希也可以用同样方法,如: my %hash = (); $hash{a} = ‘jeftom'; $hash{b} = ‘design'; print (%hash);

#!/bin/perl -w use strict; my $string = "{file => 'file1', desc => 'test'},{file => 'file12', desc => 'test2'}"; my @myarr; while( $string =~ /{(\w+)\s* =>\s*'(\w+)',\s*(\w+)\s* =>\s*'(\w+)'}/g ) { push @myarr,{$1 => $2, $3 =>$...

网站首页 | 网站地图
All rights reserved Powered by www.xxsr.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com