Replace the short bit of perl with something longer.

This version works for strings where a version part is greater than
10.