aboutsummaryrefslogtreecommitdiff
path: root/examples/run.p6
diff options
context:
space:
mode:
authorMatias Linares <matiaslina@gmail.com>2020-03-24 19:37:11 -0300
committerMatias Linares <matiaslina@gmail.com>2020-03-24 19:37:11 -0300
commite50b8fa9e02b19ece80ebeb576051e451d3a7812 (patch)
tree037db346e5deacfe21fe0bbae1b496331e3c117e /examples/run.p6
parente39257df2688137d57d88d502f7198425d5dfcd5 (diff)
downloadperl6-matrix-client-e50b8fa9e02b19ece80ebeb576051e451d3a7812.tar.gz
Rename some things to from perl6 to raku
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;
- }
-}