my ($name, $value) = ($str =~ /(\w+)\s+(\w+)/); mysub($name, $value);