DB<10> $str4='\x{aF}'                                                         

  DB<11> p $str4                                                                
\x{aF}
  DB<12> print hex $str4                                                        
0
  DB<13> print hex 'aF'                                                         
175