From e50b8fa9e02b19ece80ebeb576051e451d3a7812 Mon Sep 17 00:00:00 2001 From: Matias Linares Date: Tue, 24 Mar 2020 19:37:11 -0300 Subject: Rename some things to from perl6 to raku --- examples/rooms.raku | 12 ++++++++++++ 1 file changed, 12 insertions(+) create mode 100644 examples/rooms.raku (limited to 'examples/rooms.raku') diff --git a/examples/rooms.raku b/examples/rooms.raku new file mode 100644 index 0000000..4f0a0c7 --- /dev/null +++ b/examples/rooms.raku @@ -0,0 +1,12 @@ +use v6; +use Matrix::Client; + + +sub MAIN($username, $pass) { + my $c = Matrix::Client.new(home-server => 'https://matrix.deprecated.org'); + $c.login: $username, $pass; + + for $c.joined-rooms -> $room { + $room.say; + } +} -- cgit v1.2.3-54-g00ecf