"I think the Python library applies some heuristics in such cases"

You could look at the Python code and implement the same thing in perl. Let me know if you get stuck.

Looking at the code, that would appear to be quite an undertaking. It turns out it can be installed and run from the command line, so I will probably just go that route, though it will slow things down to load it every time it needs to be run.