$ perl -E'
    use encoding "UTF-8";
    say "\xC2\x80" =~ /^\N{U+0080}\z/ ?"match":"no match"
'
match