$ordinalValue = ord($strdomain{$ret}domain);

to

$ordinalValue = ord($strdomain[$ret]domain);