#!/usr/bin/perl

use Debian::DistroInfo;
use Text::Template;

my $updates_tmpl = Text::Template->new(SOURCE => 'templates/updates') or die;

my %vars = (
	buster_stable_key      => 'DCC9EFBF77E11517+',
	buster_automatic_key   => 'DC30D7C23CBBABEE+',
	bullseye_stable_key    => '605C66F00D6C9793+',
	#	bullseye_automatic_key => '0E98404D386FA1D9+',
	bullseye_automatic_key => '73A4F27B8DD47936+',
	bookworm_stable_key    => 'F8D2585B8783D481+',
	bookworm_automatic_key => 'B7C5D7D6350947F8+',
	trixie_stable_key      => '762F67A0B2C39DE4+',
	trixie_automatic_key   => '225629DF75B188BD+',
);

my $updates = $updates_tmpl->fill_in(HASH => \%vars, BROKEN => undef);

print($updates);