BloodDonor: Bombing out unused html stuff

lib/DDG/Goodie/BloodDonor.pm

@@ -30,11 +30,6 @@ my %typeMap = (
     'B' => 'B,O',
 );
 
-sub table_data {
-    my ($label, $value) = @_;
-    return "<tr><td class='text--secondary'>$label</td><td class='text--primary'>$value</td></tr>";
-}
-
 handle remainder => sub {
     
     return unless ($_ =~ /^(O|A|B|AB)(\-|\+)$/i);
@@ -56,13 +51,9 @@ handle remainder => sub {
         }
     }
 
-    my $output = '';
-    my $html = "<table class='blooddonor'>";
-
     my $idealStr = join(' or ', @idealResults);
     my $criticalStr = join(' or ', @criticalResults);
 
-
     my %record_data = (
         "Ideal donor" => uc($_),
         "Other donors" => $idealStr,