Dotaz: Reference na metodu v perlu

[Mr.S1lent.cz]

Zdravim,

v konstruktoru volam metodu pomoci $self->on_connect( $conn );

kdy jsem si v te metode on_connect pomoci print Dumper(@_); hodil vycuc hashe do terminalu, vse probehlo ok - prvni byl package, druhy hash instance $conn, o radek nize mam ale handler instance $conn, ktery volam timto zpusobem:

$conn->add_handler( '376', \&{$self->on_connect}( $conn ) );

ale druha polozka pri vycucu je prazdna, tedy presneji neexistuje, cemuz vubec nerozumim... mezi temito dvema perl zapisy jsou akorat komenty, cili urcite nedoslo k zadnemu vymazani nebo prepsany $conn...

Dokazal by mi prosim nekdo poradit, jak mam tu metodu on_connect protahnout tim handlerem?

Moc diky

Odpovědi

[Mr.S1lent.cz]

jeste bych doplnil: funkce on_connect obsauje pouze tyto radky: my ( $self, $conn ) = @_; print Dumper(@_); $conn->join( $conn->{channel} );

pricemz mi poprve vypise co ma a pri druhem volani pres add_handler to vyhodi chybu: Can't call method "join" on unblessed reference at "tento package"

[happy barney]

neviem presne, čo chceš, ale skús toto:

$conn->add_handler (376, sub { $self->on_connect ($conn)) });

[Mr.S1lent.cz]

Super, funguje to, moc diky Vyreseno

[pht]

Nějak nechápu, proč nepoužije rovnou $conn až v on_connect, jelikož je to očividně globální proměnná nebo tak něco.

[Mr.S1lent.cz]

To neni globalni promenna, ale predavana instanace objektu Predavam ji konstruktoru 'new', a pak handluju poprve volanou fci on_connect, ktere pochopitelne musim predat nejake parametry, jednim z nich je prave objektova instance $conn. Pokud mas jiny zpusob, jak dostat do fce parametry, nez zavolanim te dane fce s danymi parametry, ozvi se

Anebo jsi narazel na to, ze bych mohl pouzit $conn->join( $conn->{channel} ); samostatne primo v konstruktoru? To opravdu nemohl, ponevadz to musim protahnout handlerem 'add_handler'

[pht]

Pokud mas jiny zpusob, jak dostat do fce parametry, nez zavolanim te dane fce s danymi parametry, ozvi se

Ano, globální proměnnou. Někde totiž musíš mít inicializaci $conn, pravděpodobně ve stylu $conn = package->new(), tak co ti brání mít $conn jako glob. proměnnou (nebo lexikální proměnnou definovanou dostatečně vysoko, aby ji viděl i handler)?

Tím, že uděláš sub { $self->on_connect ($conn) }, dostaneš přinejmenším vedlejší efekt, který tě může a nemusí trápit: v těle on_connect budeš mít pořád stejnou hodnotu $conn, jak byla když se volalo add_handler, i kdyby se skutečná proměnná $conn mezitím změnila.

[Mr.S1lent.cz]

No $conn je navrat metody modulu, ktery vraci tu objektovou instnanci, cili pokud umi tim zpusobem, co jsi naznacil, perl pristupovat ke globalnim promennym, nebudu vahat

S perlem delam teprve par tydnu a zacal jsem z prostredka, ponevadz zaklady algorytmizace uz mam za sebou v s jinymi jazyky - byla by to nuda Takhle rovnou zkousim psat IRC bota a na tom se ucim defacto cely perl.... kazdopadne diky za radu

[happy barney]

ono aj "základy algoritmizácie" v perli môžu byť novinka

btw, pozri si perlmonks.org, riešenia otázok sú celkom poučné