How do I remove white space in a Perl string?

Question

If I declared a variable $myString with the value \'3 \' (notice the white space). Is there any function to remove the white space for the return v

Answer 1

Here's a subroutine that will allow you to remove leading and trailing whitespace from a string while also removing excesss whitespaces from within the string and replacing it with a single spaces.

-- routine

sub unspace {
    my @stringer = @_ ? @_ : $;
    $ = join( ' ', split(' ')) for @stringer;
    return wantarray ? @stringer : "@stringer";
}

-- usage

$MySpacedString = ' String with tabs    double-spaces  and other whitespace         areas.  ';
$MyCleanString = unspace($MySpacedString);