Be concise.
Be useful.
All contributions dictatorially edited by webmasters to match personal tastes.
Please do not paste any copyright violating material.
Please try to avoid dependencies to third-party libraries and frameworks.
[Ch || Ch <- "This is a\tstring with\nwhite\rspaces", Ch /= 8, Ch /= 9, Ch /= 10, Ch /= 13, Ch /= 32 ].
		
		
	let t = s.replace(/\s/g,'');
		
		
	String t = s.replaceAll("\\s+", "");
		
		
	String t = "";
for (char c : s.toCharArray())
    switch (c) {
        case ' ', '\t', '\n', '\r' -> {}
        default -> t = t + c;
    }
		
		
	(defun remove-whitespace (s &aux |t|)
  "Return a copy of S (a sequence) excluding all the characters space, tab, linefeed, return, and formfeed."
  (setf |t|
    (remove-if
        (lambda (item) (find item '(#\Space #\Tab #\Linefeed #\Return #\Page)))
        s))
  |t|)
		
		
	  SetLength(t, Length(s));
  i := 0;
  for Ch in S do
    if (Ch > #32) then
    begin
      Inc(i);
      t[i] := Ch;
    end;
  SetLength(t, i);
		
		
	my $t = $s;
$t =~ s/\s*//g;
		
		
	def parse(string):
    if not string:
        return ''
    character, *arg = string
    if not character.isspace():
        return character + parse(arg)
    return parse(arg)
t = parse(s)
		
		
	t = ''.join(s.split())
		
		
	t = s.gsub(/[[:space:]]/, "")
		
		
	t = s.gsub(/\s/, "")
		
		
	let t: String = s.chars().filter(|c| !c.is_whitespace()).collect();