+ Responder ao Tópico



  1. #1

    Padrão 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?

  2. #2
    Luzumba
    Visitante

    Padrão 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...

  3. #3

    Padrão PERL - cortar string

    dá pa dar um exemplo dessa aí do loop para ler os caracteres..

  4. #4
    Luzumba
    Visitante

    Padrão 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;
    }