#!/usr/bin/perl

use strict;
use Data::Dumper;

convert (
'MIME-Type' => 'application/ms-word',
'Input' => '[In file]',
'Output' => '[Out file]'
);

sub convert {
    my %hash = @_;

    # show the full thing
    print Dumper(\%hash);

    # or just one value
    print $hash{'Output'},"\n";
}