#!/bin/bash
  
  # Copyright 2014 Author: Andreas Kirkedal
  
  # Licensed under the Apache License, Version 2.0 (the "License");                                                    
  # you may not use this file except in compliance with the License.                                                  
  # You may obtain a copy of the License at                                                                          
  #                                                                                                                 
  #  http://www.apache.org/licenses/LICENSE-2.0                                                                    
  #                                                                                                               
  # THIS CODE IS PROVIDED *AS IS* BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY                                 
  # KIND, EITHER EXPRESS OR IMPLIED, INCLUDING WITHOUT LIMITATION ANY IMPLIED                                   
  # WARRANTIES OR CONDITIONS OF TITLE, FITNESS FOR A PARTICULAR PURPOSE,                                       
  # MERCHANTABLITY OR NON-INFRINGEMENT.                                                                                 
  # See the Apache 2 License for the specific language governing permissions and                                       
  # limitations under the License.
  
  
  #tmp1=`pwd`/anot.tmp
  
  cat $1 | perl -pe 's/\[.+?\]/ /g' | \
  perl -pe 's/\{.+?\}/ /g' | \
  perl -pe 's/ .*?\* / /g' | \
  perl -pe 's/ \*.*? / /g' | \
  perl -pe 's/\*\*+/ /g' | \
  perl -pe 's/ \*[,:.;] / /g' | \
  perl -pe 's/ \* / /g' | \
  perl -pe 's/\xEF\xBB\xBF/
  /g' | \
  
  perl -pe 's/\[.+?\]/ /g' | \
  perl -pe 's/\{.+?\}/ /g' | \
  perl -pe 's/ [a-sæøåA-ZÆØÅ0-9]+?\* / /g' | \
  perl -pe 's/ \*[a-zæøåA-ZÆØÅ0-9]+? / /g' | \
  perl -pe 's/ \*+ / /g' | \
  perl -pe 's/ \*[,:.;] / /g' | \
  perl -pe 's/\*/ /g' | \
  perl -pe 's/\<[P|p]\>/ /g' | \
  tr -s ' '
  
  #rm $tmp1