Help for this page

Select Code to Download


  1. or download this
    print shift @{[(split//,$num)[0-(@{[split//,$num]})]]}