Re^4: want way to drag tk window


Do you know where your variables are?
	PerlMonks

Re^4: want way to drag tk window

by golux (Chaplain)

on Aug 06, 2017 at 00:35 UTC ( [id://1196832]=note: print w/replies, xml )

Need Help??

in reply to Re^3: want way to drag tk window
in thread want way to drag tk window

Try, instead of:

  my $newposition = $oldposition =~
    s/\+\K([-\d]+)\+([-\d]+)$/ ($1 + $deltax) . '+' . ($2 + $deltay) /
+er;
[download]

doing this:

  $oldposition =~ /^(\d+)x(\d+)\+?([-\d]+)\+?([-\d]+)/;
  my ($newx, $newy) = ($3 + $deltax, $4 + $deltay);
  my $newposition = "${1}x${2}+${newx}+${newy}"
[download]

say substr+lc crypt(qw $i3 SI$),4,5

Comment on Re^4: want way to drag tk window Select or Download Code

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1196832]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others rifling through the Monastery: (10)

As of 2024-04-16 09:52 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found