> 2. Ez egy nagyon igenytelen programreszlet lehetne, a sub
> meghivasnal tessek figyelni.
>
> srand();
> @szamok = (1..10);
> $irdki = "SZIA!\n";
>
> , $irdki);
>
> sub szubrutin {
>    my , $uzenet) = @_;
>    print $uzenet;
>    print )+1), "\n"
> }
>
> A futtatas utan persze $uzenet undefined marad, mivel az
> interpreter @sokszam 'utolso utani' elemekent ertelmezi ezt a
> sztringet. Ez nem ujdonsag, sot termeszetes. Viszont az
> erdekelne, hogy fair uton jarok-e el, hogyha trukkosen
> megforditom csak a parameterek sorrendjet, es elobb a sztringet,
> majd az listat kuldom be? Ha korrekt, akkor jo, ha nem, akkor van
> esetleg mas megoldas, referenciak hasznalata nelkul?
>

A korrekt megoldas, termeszetesen a referenciak hasznalata. Mas nem
ajanlott. A '&' jelet, pedig felejtsd el, a 4-es Perl-bol maradt :->

, $irdki);

sub szubrutin {
   my ($sokszam, $uzenet) = @_;
   print $uzenet;
   print int(rand(@{$sokszam})+1), "\n"
}


perldoc perlreftut


Regards,

-- 
 ..------/// peter barabas <<-- z0d@(artifact|topelite|script).hu ///------.