Perl外部命令返回值问题

问题背景:用Perl直接打开db2方式执行sql
问题描述:我得到的16位的返回值,分为高8位和低8位,高8位是返回的状态,低8位是描述出现状态的原因,我可以直接得到$? >>8 这个返回值得状态的具体值
问题的点在于,这个高8位的编码依据是什么?比如我sql报错 我可以获得$?的值,在移位之前是2048,移位之后的二进制是100,我想知道这个100是怎样得来的?规则是什么?

http://bbs.chinaunix.net/thread-4181495-1-1.html