sub FETCH {
  my $self = shift;
  $self->[0]->fetch;
  my %row = %{$self->[1]};
  return {%row};
}