$input_txt =~ s/\<script.*?\<\/script\>//igs; # remove code
  $input_txt =~ s/\<.*?\>//gs; # remove html tags
  $input_txt =~ s/\&nbsp;/ /gs; # &nbsp -> space
  $input_txt =~ s/\s{2,}/ /gs; # Remove extra spaces
  print $input_txt;