s460941-metrics/count.sh

var=$(wc -l "wikiniews_results.tsv")
lines=${var%% *}
echo $lines > "lines_number.txt"

cut -f2 wikiniews_results.tsv > hypothesis.txt
cut -f3 wikiniews_results.tsv > reference.txt

awk 'BEGIN{FS=OFS="\t"}{print $0,"(sp1_"NR")"}' < hypothesis.txt > hypothesis.trn
awk 'BEGIN{FS=OFS="\t"}{print $0,"(sp1_"NR")"}' < reference.txt > reference.trn

sclite -f 0 -r reference.trn trn -h hypothesis.trn trn -e utf-8 -i rm -o all stdout | grep Scores | awk -v OFS='\t' '{print $6,$7,$8,$9}' | awk '{print($2+$3+$4)/($1+$2+$3) }' > wer_results.txt

awk '{ all+=$0;count++ } END { print all/count }' wer_results.txt >> wer.txt
awk ' $0==0 {score[0]++} $0!=0 {score[1]++} END { s=score[0]+score[1]; print(score[0]/s)*100}' wer_results.txt >> srr.txt