Help for this page

Select Code to Download

Select or download this
```
    $num = (~abs($num))+1 if $num < 0;
```

Select or download this

       return join( '', reverse @ret) || 0;