note
zentara
Yeah, I think I saw a Japh like that, where you couldn't get the mouse over
the window without it jumping. Something like:
<code>
#!/usr/bin/perl
use strict;
use Tk;
my $mw = new MainWindow();
$mw->geometry("100x100+100+100");
my $label1 = $mw->Label(-text => "Catch Me Fool", -bg => 'cyan')->
pack(-fill => 'both', -expand => 1,);
#put stuff here
$mw->bind("<Enter>",sub {
my $x = int rand 600;
my $y = int rand 600;
$mw->geometry("+$x+$y");
});
MainLoop;
</code>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-131741">
<hr />
I'm not really a human, but I play one on earth.
<a href = http://zentara.net/japh.html>Cogito ergo sum a bum</a>
</div></div>
677821
677957