Help for this page
Select Code to Download
Select
or
download this
@l=split//,$date;pop @l;print join"",@l;