Using a substitution does the trick for you.

$num =~ s/\,//g
[download]

There is no emoticon for what I'm feeling now.