Versão Imprimível
Oi, galera queria saber como fazer as seguintes coisas em perl:
Passo a passo:
1: Tinha uma @inicial = 111010000011111
Fiz o seguinte dividi ela em tres, ficando da seguinte forma
2: @segunda = 11101, 00000, 11111 ou seja agora cada posicao da minha lista é uma string, e queria sabe como ler cada posicao dessa string pois preciso contar a frequencia de cada caracter nela o que seria:
$segunda[1] = contem 4 uns e 1 0
Nao sei se fui bem claro mais quem puder me ajudar obrigado!
opa amigo não intendir direiro seu post mas vou tentar ajudar!
sua Array @segunda esta dividido em 3 partes
my @segunda = (11101, 00000, 11111);
print $segunda[0] . "\n";
print $segunda[1] . "\n";
print $segunda[2] . "\n";
test# perl teste.pl
11101
0
11111
test#
isso quer queria saber?
se nao for tenta explica melhor
Citação:
Postado originalmente por wcsmagalhaes
my @inicial = 1011110110, 1110000110, 0000011000
0 1 2
$inicial [0] = 1011110110
$inicial [1] = 1110000110
$inicial [2] = 0000011000
Agora preciso por exemplo ler cada caracter da string $inicial [0], por exemplo:
$inicial [0] = 1 0 1 1 1 1 0 1 1 0
0 1 2 3 4 ......
0
Na verdade precisaria ler cada posição do meu vetor $inicial [0] e depois calcular por exemplo:
Quantidade de zeros em $inicial [0] = 3
Quantidade de zeros em $inicial [0] = 7
Acho que agora tentei ser o mais claro possível, mais valeu mesmo pela ajuda.
Galera queria saber se alguem poderia me ajudar com isso?
#!/usr/bin/perl
# Modo desjado de impressao
# 0 1 2 3
# 0 1 2 3
# 0 1 2 3
# 0 1 2 3
# 0 1 2 3
#
#
@alelos = (00000, 11111, 22222, 33333);
$max_alelle = 5;
$loci = 4;
for ($i = 0; $i < $max_alelle; $i++)
{
for ($j = 0; $j < $loci ; $j++)
{
print "$alelos[$i][$j]\t";
}
print "$alelos[$i][$j]\n";
}
Queria imprir dessa forma em uma matriz bidimensional.
Valeu se alguem puder me ajudar.