Comment 1 for bug 281443

Essentially what I want to replace is the following logic (which I'll use for the time being)

#!/usr/bin/perl

use strict;
use LWP::Simple;

my $content = get("https://bugs.launchpad.net/~ubuntu-x-swat/+packagebugs");

foreach my $line (split /\n/, $content) {
    if ($line =~ m|ubuntu-x-swat.*>(.+) in ubuntu</a>|) {
        print "$1\n";
    }
}