Thread [Tk] Skopus von Variablen bei bind() und anonymer sub (2 answers)
Opened by pktm at 2011-03-08 23:32

pktm
 2011-03-08 23:32
#146331 #146331
User since
2003-08-07
2921 Artikel
BenutzerIn
[Homepage]
user image
Hallo!

Wir ist das mit anonymen Subs, wenn man die bei bind() verwendet? Wie weit reicht da der Skopus? Können die alle Variablen sehen, die sich im aktuellen Code-Block befinden?

Und wie kann ich explizit bestimmte Variablen übergeben, so dass ich die mit shift aus der Argument-Liste nehmen kann?

Hier ein kleines Beispiel:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

#!perl

use strict;
use warnings;
use Tk;

my $mw = Tk::MainWindow->new();
my $entry = $mw->Entry()->pack();
my $var = '123';

$entry->bind('<KeyPress>', sub{
        print "$var\n";
});

$mw->MainLoop();


modedit Editiert von pq: Tk zum Titel hinzugefügt
Last edited: 2011-03-09 00:28:57 +0100 (CET)
http://www.intergastro-service.de (mein erstes CMS :) )

View full thread [Tk] Skopus von Variablen bei bind() und anonymer sub