use strict;
use warnings;


$_ = 'Page 1 of 5';

if(/Page\&nbsp\;1\&nbsp\;of\&nbsp\;(/d+)/)
{
print "Number of Pages = ".$1;
}

__OUTPUT__
Unmatched ( in regex; marked by <-- HERE in m/Page&nbsp;1&nbsp;of&nbsp;( <-- HER
E / at test.pl line 9.