print+map{sprintf'&#%d;',$_}unpack'C*',$_;