🚀 go-pugleaf

On 2013-06-24, Giz <giz@nospam.pl> wrote:
> Witam,
>
> Mam taką tablicę:
>
> my @tablica =
>  [
>    {a=>1},
>    {a=>2},
>    {a=>3}
> ];

Zdajesz sobie sprawę z tego, że @tablica ma tylko jeden element?

> Jaką pętle powiniennem zastosować abym mogł pobierać kolejne wartości?

for/foreach?

-- 
Secunia non olet.
Stanislaw Klekot

>> Jaką pętle powiniennem zastosować abym mogł pobierać kolejne wartości?
>
> for/foreach?
> -- 
> Secunia non olet.
> Stanislaw Klekot

ok foreach ale co dalej.
Niestety ale nie mam pomysłów.

Pozdr
G.

On 2013-06-24, Giz <giz@nospam.pl> wrote:
>>> Jaką pętle powiniennem zastosować abym mogł pobierać kolejne wartości?
>>
>> for/foreach?
>> -- 
>> Secunia non olet.
>> Stanislaw Klekot
>
> ok foreach ale co dalej.
> Niestety ale nie mam pomysłów.

To znaczy w czym masz problem? Składnia for jest dość prosta.

-- 
Secunia non olet.
Stanislaw Klekot

> To znaczy w czym masz problem? Składnia for jest dość prosta.
> -- 
> Secunia non olet.
> Stanislaw Klekot

W tym że nie potrafiłem skonstruować tej składni.
Ale już sobie poradziłem z tym  że za pomocą pętli while
dzięki.


my @t=[
       {a=>1},
       {a=>2},
       {a=>3}
      ];

my $i=0;
while($t[0][$i])
  {
   print $t[0][$i]->{a}."\n";
   $i++;
  }

Tako rzecze Giz :
>>> Jaką pętle powiniennem zastosować abym mogł pobierać kolejne wartości?
>>
>> for/foreach?
>> -- 
>> Secunia non olet.
>> Stanislaw Klekot
>
> ok foreach ale co dalej.
> Niestety ale nie mam pomysłów.

>>perl -e '@t=[{a=>1},{a=>2},{a=>3}]; foreach $x(@t){ foreach $y(@$x) { print $$y{'a'},"\n";}}'

> G.

Sławek
-- 
  ________ 
_/ __/ __/ Roses are red, Violets are blue. I'm a schizophrenic and so am I
 \__ \__ \_______________________________________________________________
 /___/___/ Sławomir Szczyrba                          steev/AT/hot\dot\pl

kompaktowo:

print $_->{a} for @tablica;

Pełnie:

foreach my $foo ( @tablica ) # tablica anonimowych haszy
{
   print $foo->{'a'};
}