There are not that many string manipulating functions in puppet itself
but you can always build your own [1] or have a look at the puppet-std
[2]
However your problem can be solved with the build-in function regsubst
which can be found in the function reference [3]
This should work (while untested)
$cutversion = regsubst($version, '^(\d+)\.(\d+).*$', '\1\2')
Does this help?
-Stefan
[1] http://docs.puppetlabs.com/guides/custom_functions.html
[2] https://github.com/puppetlabs/puppetlabs-stdlib
[3] http://docs.puppetlabs.com/references/2.7.9/function.html#regsubst
-Stefan