- PERL - cortar string
+ Responder ao Tópico
-
PERL - cortar string
Boas pessoal do forum, é o seguinte, num script em perl tenho uma variavel que me dá um valor sempre de 2 caracteres, por exemplo:
my $var = "ab";
como eu faço em perl para dividir ao meio esta var, ou seja, ficar mais ou menos assim:
$var1="a";
$var2="b";
perceberam?
ou simplesmente fazer um print de "a" ou "b", apenas um caracter.. como fazer isso?
-
PERL - cortar string
tem duas formas... se essa sua string for separada por virgula, usa o split, que coloca tudo em um array
ou vc. pode fazer um laço, do tipo for, pra ir andando de caracter por caracter e ir armzenando em um array tbm...
-
PERL - cortar string
dá pa dar um exemplo dessa aí do loop para ler os caracteres..
-
PERL - cortar string
@pares = split(/&/, $buffer); #o & é a string de sepação no caso deixe sem nada Ex. //
foreach $par (@pares)
{ # jogando o nome do campo na variável campo e seu valor na variável valor
($campo, $valor) = split("=", $par);
# convertendo + em espaço em branco
$valor =~ tr/+/ /g;
# convertendo os caracteres em hexadecimal para sua representaçao ASCII
$valor =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
# colocando no hash conteudo os valores dos campos, usando os nomes dos
# campos como chaves
$conteudo{$campo} = $valor;
}