my $encoding = "whatever";
my $octets = "characters in whatever encoding...";

eval '$_ = decode( $encoding, $octets, Encode::FB_CROAK )';

if( $@ ) {
    report_an_error();
    ...
}