aboutsummaryrefslogtreecommitdiff
path: root/examples/run.p6
diff options
context:
space:
mode:
Diffstat (limited to 'examples/run.p6')
-rw-r--r--examples/run.p621
1 files changed, 0 insertions, 21 deletions
diff --git a/examples/run.p6 b/examples/run.p6
deleted file mode 100644
index f78df16..0000000
--- a/examples/run.p6
+++ /dev/null
@@ -1,21 +0,0 @@
-#!/usr/bin/env perl6
-use v6;
-use lib <lib>;
-use Matrix::Client;
-
-sub MAIN(Str:D $username, Str:D $password, :$home-server = "https://matrix.deprecated.org") {
- my Matrix::Client $client .= new: :$home-server;
- $client.login($username, $password);
-
- my $sup = $client.run(:sleep<5>);
-
- signal(SIGINT).tap({
- say "Bye";
- $client.logout;
- exit 0;
- });
-
- react whenever $sup -> $ev {
- say $ev;
- }
-}