#!/usr/bin/perl

use strict;
use warnings;
use HTTP::Message;

my $can_accept = HTTP::Message::decodable();
print $can_accept, "\n";