Remove extra print statements

amica.pl

@@ -33,9 +33,7 @@ sub parse_amica {
     my $SetMenus = $LunchMenu->{'SetMenus'};
     my $Html = $LunchMenu->{'Html'};
     if (length($Html) > 0) {
-      print "Doing html\n";
       my @Menus = split('<p>', $Html);
-      print "SetMenus" . @Menus . "\n";
       foreach my $SetMenu (@Menus) {
         my @Meals = split('<br />', $SetMenu);
 	foreach my $Meal (@Meals) {