Skip to content

Instantly share code, notes, and snippets.

@kimmel

kimmel/accept_http_compression.pl

Last active October 11, 2015 21:38
Show Gist options
  • Save kimmel/3922897 to your computer and use it in GitHub Desktop.
Save kimmel/3922897 to your computer and use it in GitHub Desktop.
Download ZIP
Show decodable HTTP compression formats
Raw
accept_http_compression.pl
#!/usr/bin/perl
use v5.16;
use warnings;
use autodie qw( :all );
use utf8::all;
use LWP::UserAgent;
my $ua = LWP::UserAgent->new;
my $can_accept = HTTP::Message::decodable;
say $can_accept;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment