the logic is like:
$charset = = Encode::Detect::Detector::detect($input);
if($charset eq 'UTF-8'){
  # do NFC ...
}elsif($charset eq 'iso-8859-1'){
  # do NFD ...
}