Data commit

Task/Simple-windowed-application/Raku/simple-windowed-application.raku

@@ -0,0 +1,22 @@
+use GTK::Simple;
+use GTK::Simple::App;
+
+my GTK::Simple::App $app .= new(title => 'Simple Windowed Application');
+
+$app.size-request(350, 100);
+
+$app.set-content(
+    GTK::Simple::VBox.new(
+        my $label  = GTK::Simple::Label.new( text  => 'There have been no clicks yet'),
+        my $button = GTK::Simple::Button.new(label => 'click me'),
+    )
+);
+
+$app.border-width = 40;
+
+$button.clicked.tap: {
+    state $clicks += 1;
+    $label.text = "There has been $clicks click{ 's' if $clicks != 1 }";
+}
+
+$app.run;