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

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

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

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

具体函数我不清楚是否可以直接实现,但是可以通过变相实现。 #!/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...

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

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

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

#! /usr/bin/perl use strict; use warnings; my @array = (0 .. 9); my $tmp = 10; print "@array\n"; push(@array,$tmp); print "@array\n"; @array = $tmp + 1; print "@array\n"; ------------------------------------------------- 输出:...

print join ',',@your_array;

PHP 中的 serialize() 函数可以实现 (PHP数组序列化函数) string serialize ( mixed $value ) serialize() 返回字符串,此字符串包含了表示 value 的字节流,可以存储于任何地方。 这有利于存储或传递 PHP 的值,同时不丢失其类型和结构。 想...

方法: 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);

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