Hashref bei anonymer Funktion - #104170 (Allgemeines zu Perl)

Froschpopo

2007-12-28 10:44

User since
2003-08-15
2653 Artikel
BenutzerIn
[default_avatar]

ich finde das zu komplziert und arbeite auch nicht so gerne mit do. $/ bin ich auch nicht gewohnt.

Ich hab aber mal noch eine andere Frage:
auf das vorherige Bsp:

Code (perl): (dl )

my $hashref = sub {
    return shift;
};
print $hashref->(5),"\n";
print $hashref->(125),"\n";

Wo ist eigentlich der Unterschied zu:

Code (perl): (dl )

my $hashref = sub {
    return int(rand(1000));
};
print $hashref->(),"\n";
print $hashref->(),"\n";  #ergibt dasselbe ergebnis wie beim ersten print()

Wie oft wird $hashref denn nun ausgeführt? Nur einmal zum Zeitpunkt der Deklarierung? Oder jedesmal, wenn ich irgendwo $hashref auftaucht?

Konkret:

Code (perl): (dl )

my $hashref = sub {
    return $dbh->selectrow_array("SELECT * FROM users");
};
print $hashref->(),"\n";
print $hashref->(),"\n";

Ist diese Funktion jetzt statisch oder nicht? Das wäre ja blödsinn, wenn bei jedem print die ganze Datenbankabfrage neu ausgeführt wird.