How do I convert from decimal to octal

Using sprintf:

    $oct = sprintf("%o", 3735928559);

    use Bit::Vector;
    $vec = Bit::Vector->new_Dec(32, -559038737);
    $oct = reverse join('', $vec->Chunk_List_Read(3));