diff options
Diffstat (limited to 'lib/sbin/ThornUtils.pm')
-rw-r--r-- | lib/sbin/ThornUtils.pm | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/lib/sbin/ThornUtils.pm b/lib/sbin/ThornUtils.pm index 7880009f..ec42061f 100644 --- a/lib/sbin/ThornUtils.pm +++ b/lib/sbin/ThornUtils.pm @@ -635,6 +635,21 @@ sub AddQuotes { } #/*@@ +# @routine RemoveQuotes +# @date Sat Apr 20 2002 +# @author Gabrielle +# @desc +# Simply takes away any enclosing quotes if they exist. +# @enddesc +# @version +#@@*/ +sub AddQuotes { + my $var = shift; + $var =~ s/^\s*?\"(.*)\"\s*?$/$1/; + return $var; +} + +#/*@@ # @routine SetWidth # @date Sun Mar 3 01:54:37 CET 2002 # @author Ian Kelley |