Perl function to trim string leading and trailing whitespace

Question

Is there a built-in function to trim leading and trailing whitespace such that trim   hello world    eq  hello world

User · Answer

Here s one approach using a regular expression    string    s   s   s    g         remove both leading and trailing whitespace   Perl 6 will include a trim function    string    trim    Source  Wikipedia

User · Answer

There s no built-in trim function  but you can easily implement your own using a simple substitution   sub trim        my  s      0      s   s   s    g      return  s      or using non-destructive substitution in Perl 5 14 and later   sub trim      return    0     s   s   s    rg

User · Answer

For those that are using Text  CSV I found this thread and then noticed within the CSV module that you could strip it out via switch    csv   Text  CSV- gt new  allow whitespace   gt  1      The logic is backwards in that if you want to strip then you set to 1   Go figure   Hope this helps anyone

User · Answer

According to this perlmonk s thread    string    s   s   s    g

User · Answer

No  but you can use the s    substitution operator and the  s whitespace assertion to get the same result

User · Answer

Apply  s   s     s  s      to it  Or use  s   s   s    g if you want to be fancy

User · Answer

This is available in String  Util with the trim method   Editor s note  String  Util is not a core module  but you can install it from CPAN with  sudo  cpan String  Util   use String  Util  trim   my  str      hello      str   trim  str   print  string is now    str  n     prints      string is now  hello    However it is easy enough to do yourself    str    s   s      str    s  s

User · Answer

I also use a positive lookahead to trim repeating spaces inside the text    s   s   s    s   s    g

User · Answer

Complete howto in the perfaq here  http   learn perl org faq perlfaq4 html How-do-I-strip-blank-space-from-the-beginning-end-of-a-string-

User · Answer

One option is Text  Trim   use Text  Trim  print trim    example

[perl] Perl: function to trim string leading and trailing whitespace

Examples related to perl