add support escape character '\' for character #

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@10113 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
ellen56 2011-07-19 06:17:27 +00:00
parent 9d242b3730
commit 1e7f4bed43

View File

@ -576,7 +576,9 @@ sub trim
{
my $str = shift @_;
if($str){
$str =~ s/\#/__wellnumber__/g;
$str =~ s/^\s+|#.+|\s+$//g;
$str =~ s/__wellnumber__/#/g;
}
return $str;
}