sub dec2bin
{
     return sprintf("%b",shift);
}