<%

  my $user = param('user');

  warn param('user.keys');

  my $keys = app->dbi->model('ssh_public_key')->select(where => {user_id => $user})->all;

  my $keys_str = '';

  for my $key (@$keys) {

    $keys_str .= "$key->{key}\n";

  }

  $self->render(text => $keys_str);

  return;

%>