Help for this page

Select Code to Download

Select or download this

# Untested :(
sub dedup {
...
  }
  $#{$ref} = $n-1;
}