$server = Frontier::Client->new(
    url => $server_url
);

...

$server->call( 'remove_profile', $profile_name, $token, "True" )
  or  die "Could not delete system $profile_name, $!";