my $decoded = decode_mimewords($data);
print $decoded;