/Firstname:(?:\s|<.*?>)*([^&<]+)/s;
print "First: $1\n";
/Lastname:(?:\s|<.*?>)*([^&<]+)/s;
print "Last: $1\n";