How to make a response without headers, http://www.w3.org/Protocols/rfc2616/rfc2616-sec6.html#sec6

without_header.pl

#!/usr/bin/env perl
package No::Headers;
use Mojo::Base "Mojo::Headers";
sub to_string { "" };

package main;
use Mojolicious::Lite;

get "/" => sub {
  my $c = shift;

  $c->res->content->headers(No::Headers->new) if $c->param('x');
  $c->render(text => "test\n");
};

# MOJO_USERAGENT_DEBUG=1 perl without_header.pl get "/?x=1"
app->start;