## returns the modified string
  print mchomp $string;
  ## modifies the variable directly
  mchomp \$string; print $string;
  ## returns an array of modified strings
  print join ",",mchomp @array;
  ## modifes the array inplace
  mchomp \@array; print join ",",@array;
  ## returns the modified hash
  %new=mchomp %hash;print values %new;
  ## modifes the hash inplace
  mchomp \%hash;print values %hash;