sub convert {
   # Since this is an object method, the object is passed as first arg;
   my $self = shift;
   # now load the rest of the args into a hash
   my %arg = @_;

   if ($arg{"MIME-Type"} eq "application/ms-word") {
      install_openofficedotorg()
...
}