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
|
#!/bin/sh
POD=<<EOPOD
=head1 NAME
get-ubuntu-packages - returns the list of packages which are maintained by debian-perl team in Ubuntu
=head1 SYNOPSIS
$ get-ubuntu-packages
ack-grep
alice
...
=head1 DESCRIPTION
This script will query the list of packages from the udd database at
udd-mirror.debian.net which are originated from the B<debian-perl team> and
are in B<Ubuntu>.
One package per line. Its output can later piped to other scripts like
L<lp-mass-subscribe>.
=head1 COPYRIGHT & LICENSE
2012, Nathan Handler <nhandler@ubuntu.com>
2018, gregor herrmann <gregoa@debian.org>
Permission to use, copy, modify, and/or distribute this software for any
purpose with or without fee is hereby granted, provided that the above
copyright notice and this permission notice appear in all copies.
THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES WITH
REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY SPECIAL, DIRECT,
INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR
OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
PERFORMANCE OF THIS SOFTWARE.
=cut
EOPOD
PGPASSWORD=udd-mirror psql --host=udd-mirror.debian.net --user=udd-mirror --port 5432 --tuples-only udd << EOF
SELECT source from ubuntu_packages
WHERE maintainer='Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>'
OR original_maintainer='Debian Perl Group <pkg-perl-maintainers@lists.alioth.debian.org>'
GROUP BY source
ORDER BY source;
EOF
|
