The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# IUP->Message example

use strict;
use warnings;

use IUP ':all';

IUP->Message("IUP::Message", "Press the button the button");

IUP->Message("Press the button the button again (dialog without title)");