Help for this page

Select Code to Download

Select or download this

sub swap($a is rw, $b is rw) {
  ($a, $b) = ($b, $a)
}