Anonymous user
Simple windowed application: Difference between revisions
→{{header|Perl}}
Line 825:
# Main loop.
Gtk->main;</lang>
{{libheader|XUL::Gui}}
<lang perl>use XUL::Gui;
display
TextBox( id=>'txt', value=>'there have been no clicks yet' ),
Button( label=>'click me', oncommand=>sub{
$ID{txt}->value = ++$clicks
});
</lang>
=={{header|Python}}==
| |||