%# %# $Id$ %# % layout 'default'; % title 'Maacom'; % use Mojo::Util qw(dumper); % my $u = $c->app->user; % my $unwanted_id = $c->req->param('unwanted_id') || 0; % my $profile = $u->unwanted_profile($unwanted_id); % if ($profile) { % my $name = $profile->{name}; % my $res = $u->unwanted_delete($unwanted_id); % if ($res) {
Host <%= $name %> has been deleted
% } % unless ($res) {
Host <%= $name %> was not deleted
% } % } % unless ($profile) {
Host with id <%= $unwanted_id %> not exist
% } %#EOF