sub mixedregex {
  s[\\0([0-7]{3})][chr oct $1]egr;
}