my ($country, $year) = @_; # changed