s460941-metrics/count.sh

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

#cut -f2 wikiniews_results.tsv | awk 'BEGIN{FS=OFS="\t"}{print $0,"(sp1_"NR")"}' > hyp.trn
#cut -f3 wikiniews_results.tsv | awk 'BEGIN{FS=OFS="\t"}{print $0,"(sp1_"NR")"}' > ref.trn

#sclite -f 0 -r ref.trn trn -h hyp.trn trn -e utf-8 -i rm -o pra stdout | grep "Scores:" | sed 's/Scores: (#C #S #D #I) // ' | awk '{ print ($2+$3+$4)/($1+$2+$3)}' > wer_all.txt
#awk '{ sum += $1; n++ } END { print sum / n; }' < wer_all.txt >> wer.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 > Scores
awk 'BEGIN{FS=OFS="\t"}{print $6, $7, $8, $9}' < Scores | 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 ' $1==0 {score[0]++} $1!=0 {score[1]++} END { s=score[0]+score[1]; print(score[0]/s)*100}' wer_results.txt > srr.txt