use Class::ParmList qw(simple_parms);

sub convert {
   my ($from, $to, $thing) = simple_parms([qw(from to thing)], @_);

   #...
}