Select Code to Download

sub length
{
...
        
    return $length;
}

scalar($uriobj->as_list)
        $uriobj->length
...
0       -399    foo[600-1000]bar
1       0       foo{011-047}bar