La función split
es la inversa de join :
convierte un escalar en un arreglo.
split /PATTERN/,EXPR,LIMIT
retorna el arreglo resultante
de partir la cadena EXPR
. Si se especifica LIMIT
indica el número máximo de campos en los que se divide.
lhp@nereida:~/projects/perl/src$ perl -wde 0 main::(-e:1): 0 DB<1> $a = 'a:b:c:d:e' DB<2> @a = split /:/, $a DB<3> x @a 0 'a' 1 'b' 2 'c' 3 'd' 4 'e' DB<4> @a = split /:/, $a, 3 DB<5> x @a 0 'a' 1 'b' 2 'c:d:e' DB<6> $a = 'a:b:c:d::' DB<7> @a = split /:/, $a DB<8> x @a # Los nulos finales se suprimen 0 'a' 1 'b' 2 'c' 3 'd' DB<9> @a = split /:/, $a, -1 DB<10> x @a # No si LIMIT es negativo 0 'a' 1 'b' 2 'c' 3 'd' 4 '' 5 ''Observe que en
split
el primer parámetro es una expresión regular
mientras que en join
es un carácter.
Casiano Rodríguez León