my %data;
my %data2;
-my @archs = ("source", "all", "amd64", "i386", "alpha", "arm", "armel", "armhf", "hppa",
+my @archs = ("source", "all", "amd64", "arm64", "i386", "alpha", "arm", "armel", "armhf", "hppa",
"hurd-i386", "ia64", "kfreebsd-amd64", "kfreebsd-i386", "mips", "mipsel", "powerpc", "s390",
"s390x", "sparc");
}
}
-foreach $p (sort keys %data) {
+foreach my $p (sort keys %data) {
print "$p";
foreach $a (@archs) {
print ", $data{$p}{$a}";