$string =~ s/\t/  /g;    
$string =~ s/^\s*$//g;