sub convert {
      my %arg   = @_;
      my $from  = $arg{from}  || 'default';
      my $to    = $arg{to}    || 'default';
      my $thing = $arg{thing} || 'default';
      ...
   }