documentclass{article}

makeatletter
defPrintdimen#1#2{strip@pt dimexpr #2 *65526 /numberdimexpr 1#1}
makeatother

begin{document}

Printdimen{mm}{hsize} mm
end{document}