diff --git a/ACU/API/Base.pm b/ACU/API/Base.pm
index 72d860e..2d9c632 100644
--- a/ACU/API/Base.pm
+++ b/ACU/API/Base.pm
@@ -105,8 +105,10 @@ sub send($$$)
     log(DEBUG, 'POST Request to ', API_URL, $url);
     my $req = POST API_URL . $url, shift;
 
-    my $cnt = $ua->request($req)->content;
+    my $res = $ua->request($req);
+    log TRACE, $res;
 
+    my $cnt = $res->content();
     log TRACE, $cnt;
 
     return parse($next, $cnt);
diff --git a/ACU/API/Projects.pm b/ACU/API/Projects.pm
index abb0adf..5f1a2c5 100644
--- a/ACU/API/Projects.pm
+++ b/ACU/API/Projects.pm
@@ -103,7 +103,10 @@ sub add_grades($;$)
     my %data = (
 	project_name => shift
 	);
-    $data{year} = $_ if (shift);
+    my $y = shift;
+    if ($y) {
+	$data{year} = $y;
+    }
 
     my $res = API::Base::send('ResultHandler', "projects/notes/add.xml", \%data);
 
@@ -120,7 +123,10 @@ sub add_traces($$;$)
 	project_name => shift,
 	trace_name => shift,
 	);
-    $data{year} = $_ if (shift);
+    my $y = shift;
+    if ($y) {
+	$data{year} = $y;
+    }
 
     my $res = API::Base::send('ResultHandler', "projects/traces/add.xml", \%data);
 
diff --git a/ACU/Defense.pm b/ACU/Defense.pm
index ae14f44..d286567 100644
--- a/ACU/Defense.pm
+++ b/ACU/Defense.pm
@@ -178,7 +178,6 @@ sub genIds ($;$)
 		}
 		else {
 		    $ans_i += 1;
-		    $cur_aid = $answer->{id};
 		}
 	    }
 	}