Skip to content

Instantly share code, notes, and snippets.

@aduitsis
Created August 1, 2014 13:41
Show Gist options
  • Save aduitsis/ed141c38e488d9050e2e to your computer and use it in GitHub Desktop.
Save aduitsis/ed141c38e488d9050e2e to your computer and use it in GitHub Desktop.
#!/usr/bin/perl
use Gtk3 -init;
my $hello = Gtk3::MessageDialog->new (undef, 'modal', 'info', 'ok', "Hello world!");
$hello->set ('secondary-text' => 'This is an example dialog.');
$hello->run;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment