summaryrefslogtreecommitdiffstats
path: root/script/perlpkg.pl
blob: c78a05eff14b7a322283de464ba474ae952b552f (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
57
58
59
60
61
62
#!/usr/bin/env perl

use v5.24;

use warnings;
use strict;

use Function::Parameters;
use Log::Any::Adapter;
use Log::Log4perl qw(:easy);
use JSON;

use App::ArchLinux::PackagerTools;

=head1 NAME

perlpkg.pl - Script to support perl packaging on Arch Linux

=head1 SYNOPSIS

  perlpkg.pl [options]

  Options:
    --debug

=head1 DESCRIPTION

TODO

=head1 CONFIGURATION

To configure the script create a file called $XDG_CONFIG_HOME/perlpkg/config.toml.

The configuration file is not yet used/read.

TODO

=head1 SEE ALSO

L<App::ArchLinux::PackagerTools>

=cut

Log::Log4perl->easy_init($ERROR);
if ($ARGV[0] // "" eq "--debug") {
	Log::Log4perl->easy_init($TRACE);
} else {
	Log::Log4perl->easy_init($INFO);
}
Log::Any::Adapter->set('Log4perl');

my $app = App::ArchLinux::PackagerTools->new();

use Data::Dumper;

my $filtered_pkgs = $app->get_filtered_updateable_packages();

print encode_json($filtered_pkgs);

# TODO generate new pacakge pkgbuild
# TODO build
# TODO release