#!/usr/bin/env perl

use Mail::Message::Field::Full;
my $s = Mail::Message::Field::Full->new(subject =>
  '=?UTF-8?Q?KBOO Earth Day Panelist Interview Update?=');

print "$s\n";

