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