blob: d7daea876e9f157145001fc59b78049b890314d0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
use v6.c;
unit class Matrix::Bot::DeprecatedOrg:ver<0.0.1>:auth<cpan:MATIASL>;
use Config;
use Matrix::Bot;
use Matrix::Bot::Plugin::Dominating;
sub MAIN($config-file where *.IO.f) is export {
my $config = Config.new().read($config-file);
my %matrix-config = $config<matrix>;
dd %matrix-config;
dd $config<dominating>;
my $bot = Matrix::Bot.new(
home-server => %matrix-config<server>,
username => %matrix-config<username>,
password => %matrix-config<password>,
plugins => [
Matrix::Bot::Plugin::Dominating.new(:config($config<dominating>))
],
);
$bot.run;
}
=begin pod
=head1 NAME
Matrix::Bot::DeprecatedOrg - blah blah blah
=head1 SYNOPSIS
=begin code :lang<perl6>
use Matrix::Bot::DeprecatedOrg;
=end code
=head1 DESCRIPTION
Matrix::Bot::DeprecatedOrg is ...
=head1 AUTHOR
Matias Linares <matiaslina@gmail.com>
=head1 COPYRIGHT AND LICENSE
Copyright 2020 Matias Linares
This library is free software; you can redistribute it and/or modify it under the Artistic License 2.0.
=end pod
|