Blame view

egs/sprakbanken/s5/local/norm_dk/write_punct.sh 1.6 KB
8dcb6dfcb   Yannick Estève   first commit
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
  #!/bin/bash
  
  # Copyright 2014 Mirsk Digital ApS  (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.
  
  
  perl -pe 's/([
   ])\.([ 
  ])/\1PUNKTUM\2/g' | \
  perl -pe 's/([
   ])\:([ 
  ])/\1KOLON\2/g' | \
  perl -pe 's/([
   ])\;([ 
  ])/\1SEMIKOLON\2/g' | \
  perl -pe 's/([
   ])_NL_([ 
  ])/\1NY LINJE\2/g' | \
  perl -pe 's/([
   ])_NS_([ 
  ])/\1NYT AFSNIT\2/g' | \
  
  tr -s ' '