Thank u ..I Got the output...

use HTML::Entities;
use Encode;

my $first_name_assign="$firstname";

$first_name_assign=decode('UTF-8',$first_name_assign);

$first_name_assign=decode_entities($first_name_assign);

my $first_name_length=length($first_name_assign);

print "$first_name_length";
[download]