in reply to ascii in regular expression

if ($line =~ m/\xDB/) {
  # $line contains character 219 (0xDB in hex)
}

[download]

In Section Seekers of Perl Wisdom