use HTML::Entities::Numbered;
 
$html    = 'Hi Honey<b>&hearts;</b>';
 
# convert named HTML entities to numbered (decimal)
$decimal = name2decimal($html);    # Hi Honey<b>&#9829;</b>