Re: Perl: For Beginners

#!/usr/bin/perl --
use strict;
use warnings;
use Wx;
use Wx::Demo;
my $app    = Wx::SimpleApp->new;
my $demo   = Wx::Demo->new;
$demo->show_module( 'Wx::DemoModules::wxRichTextCtrl');
$demo->show_demo_window;
$app->MainLoop;
exit( 0 );
[download]

RFC for Tutorials: Using BoxSizer Layout Manager in wxPerl

Re^5: Packaging Perl Programs (is) Painful

and GTK2::GladeXML both fell into the category of unbuildable last time I tried on Win32
Yes, its a huge negative that there aren't ppms for the various Gtk2..., but there is hope, See Re: install Gtk2::GladeXML
I think Wx looks great and has the functionality I'd need, but all of the existing documentation is for the C++ version. You need to translate it to perl, and not all concepts map cleanly from one language to the other. And as the original poster pointed out, it's not trivial to deploy a WxPerl application.
They map well enough , honest. Start with http://wxperl.sourceforge.net/tutorial/tutorial1.html
Then download chm file here, Wx-Demo, and dont forget about the samples
Short version, wxFrame in perl is Wx::Frame, methods are called using arrow not dot.
For all other differences the documentaion contains notes like this

wxWindow::ClientToScreen

virtual void ClientToScreen(int* x, int* y) const
wxPerl note: In wxPerl this method returns a 2-element list instead of modifying its parameters.
virtual wxPoint ClientToScreen(const wxPoint& pt) const
Converts to screen coordinates from coordinates relative to this window.
x
A pointer to a integer value for the x coordinate. Pass the client coordinate in, and a screen coordinate will be passed out.

y
A pointer to a integer value for the y coordinate. Pass the client coordinate in, and a screen coordinate will be passed out.

pt
The client position for the second form of the function.

wxPython note: In place of a single overloaded method name, wxPython implements the following methods:

ClientToScreen(point) Accepts and returns a wxPoint

ClientToScreenXY(x, y) Returns a 2-tuple, (x, y)

so in wxperl this maps pretty much the same. So you can use any of these
$ perl -MWx -le"print for Wx::Window->new->ClientToScreen( 0,0  )"
0
0

$ perl -MWx -le"print for Wx::Window->new->ClientToScreen( [0,0]  )"
Wx::Point=SCALAR(0x98a3c4)

$ perl -MWx -le"print for Wx::Window->new->ClientToScreen( Wx::Point->
+new( 0,0 )  )"
Wx::Point=SCALAR(0xda76e4)
[download]
In perl [ -1, -1 ] is a shortcut for wxPoint or wxSize depending on context.
Heres a hint to how wxPerl does overloading
$ perl -MWx -le"print for grep /clienttoscreen/i, keys %Wx::Window::"
ClientToScreenPoint
ClientToScreen
ClientToScreenXY
[download]
So you could also write
$ perl -MWx -le"print for Wx::Window->new->ClientToScreenXY( 0,0  )"
0
0

$ perl -MWx -le"print for Wx::Window->new->ClientToScreenPoint( [0,0] 
+ )"
Wx::Point=SCALAR(0x3e8b64)

$ perl -MWx -le"print for Wx::Window->new->ClientToScreenPoint( Wx::Po
+int->new( 0,0 )  )"
Wx::Point=SCALAR(0x9cf5c4)
[download]

...

[reply]
[d/l]
[select]

Re^4: Perl: For Beginners

by Anonymous Monk on Jun 03, 2014 at 07:54 UTC

https://github.com/jmlynesjr/wxPerl-wxBook-Examples/

More wxPerl Examples now on Github

jmlynesjr

[reply]

Re^3: Perl: For Beginners

by Steve_BZ (Chaplain) on Aug 04, 2011 at 14:45 UTC

If you install Wx::Demo from cpan (it should install all your dependencies for you). Then run wxperl_demo.pl (it should be on your path). All code for each page displayed is shown to you. You can use this with one of the Hello world tutorials to get started.

Good luck

Steve

[reply]


Keep It Simple, Stupid
	PerlMonks