From afd6017cc9e7347e229ee3f0d0708b625cdca0dc Mon Sep 17 00:00:00 2001 From: ulimaass Date: Sat, 6 Oct 2012 18:50:50 +0000 Subject: [PATCH] Added to 99_Utils.pm : trim(), ltrim(), rtrim() git-svn-id: https://fhem.svn.sourceforge.net/svnroot/fhem/trunk/fhem@1930 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- FHEM/99_Utils.pm | 39 +++++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) diff --git a/FHEM/99_Utils.pm b/FHEM/99_Utils.pm index 141eff6c6..4f7bc6a87 100644 --- a/FHEM/99_Utils.pm +++ b/FHEM/99_Utils.pm @@ -52,4 +52,43 @@ abstime2rel($) return sprintf("%02d:%02d:%02d", $diff/3600, ($diff/60)%60, $diff%60); } + +######## trim ##################################################### +# What : cuts blankspaces from the beginning and end of a string +# Call : { trim(" Hello ") } +# Source: http://www.somacon.com/p114.php , +# http://www.fhemwiki.de/wiki/TRIM-Funktion-Anfangs/EndLeerzeichen_aus_Strings_entfernen +sub trim($) +{ + my $string = shift; + $string =~ s/^\s+//; + $string =~ s/\s+$//; + return $string; +} + +######## ltrim #################################################### +# What : cuts blankspaces from the beginning of a string +# Call : { ltrim(" Hello") } +# Source: http://www.somacon.com/p114.php , +# http://www.fhemwiki.de/wiki/TRIM-Funktion-Anfangs/EndLeerzeichen_aus_Strings_entfernensub ltrim($) +sub ltrim($) +{ + my $string = shift; + $string =~ s/^\s+//; + return $string; +} + +######## rtrim #################################################### +# What : cuts blankspaces from the end of a string +# Call : { rtrim("Hello ") } +# Source: http://www.somacon.com/p114.php , +# http://www.fhemwiki.de/wiki/TRIM-Funktion-Anfangs/EndLeerzeichen_aus_Strings_entfernensub ltrim($) +sub rtrim($) +{ + my $string = shift; + $string =~ s/\s+$//; + return $string; +} + + 1;