Is there a way to do GUI programming with ActivePerl?
As of the Perl Resource Kit for Win32, the Tk library has been successfully ported to ActivePerl. Tk version 8xx and above also now has the look and feel of Windows programs, and not the old UNIX look of previous versions. You can also use the Win32::GUI module which also allows for GUI’s to be made/manipulated using Perl. This module uses the standard Windows widgets to give the look and feel of Windows programs. For Tk information, go to http://w4.lns.cornell.edu/~pvhp/ptk/ptkTOC.html For Win32::GUI, go to http://dada.perl.it Win32::MsgBox allows for a fast and easy way to display a Windows message box, for example: use Win32; MsgBox(“Test”, “This is a test”, 48); # display a message box with an exclamation mark and an ‘Ok’ button sub MsgBox { my ($caption, $message, $icon_buttons) = @_; my @return = qw/- Ok Cancel Abort Retry Ignore Yes No/; my $result = Win32::MsgBox($message, $icon_buttons, $caption); return $return[$result]; } The last value, $icon_buttons, is the sum of two valu
