Only that I did not think to use hex. It would probably be a better approach than eval.

I don't think the OP had reason to distrust the input data, but if he did then it would be wise to sanitise with a regular expression like:my($clean) = ($raw =~ m/(\d+)/); regardless of how it is processed further.