Help for this page

Select Code to Download

Select or download this

sub swap
{
...
       $_[0] = $_[1];
       $_[1] = $temp;
}