aboutsummaryrefslogtreecommitdiff
path: root/examples/rooms.p6
blob: 4f0a0c7e35fb457222bc546acb197a5ef05acf35 (plain)
1
2
3
4
5
6
7
8
9
10
11
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;
    }
}