Konuşma :: Tanıma :: Sclite Konuşma :: Tanıma :: SCLite, NIST SCTK'DAN SCLTITE ARAÇINININ EGENGİSİNDE NESZLEŞTİRME TABANLI SAVİLERDİR.
Şimdi İndirin

Konuşma :: Tanıma :: Sclite Sıralama ve Özet

Konuşma :: Tanıma :: Sclite Etiketler

Perl modülü sarıcı nesne tabanlı Nesne tabanlı sarmalayıcı Nist sctk Nist

Konuşma :: Tanıma :: Sclite Açıklama

Konuşma :: Tanıma :: SCLite, NIST SCTK'tan Sclite aracının etrafındaki nesneye dayalı bir sarmaladır. Konuşma :: Tanıma :: SCLite, NIST SCTK.Synopsis # sclite aracının etrafındaki nesneye dayalı bir sarmalayıcıdır. İstediğiniz şekilde doğru ve varsayılan okumaları toplayın. # Burada, aşağıdaki oyuncak alt read_trans tarafından başarılı bir şekilde ayrıştırılabilen iki metin dosyasında bulunduğunuzu varsayıyorum. benim (% correy_readings) = read_trans ('doğru.txt'); benim (% hyp_readings) = read_trans ('hipoteses.txt'); # Gerçek iş burada başlıyor Speech :: teçhizat :: sclite; # varsayılan ('SCLITE') çalıştırılabilir adını veya konuşmanın bir yolunu veya yolunu değiştirin :: Tanıma :: SCLite-> Yürütülebilir ('/ USR / Site / Bin / SCTK-1-04 / SCLite-1-04'); benim ($ golcü) = konuşma :: tanımak :: SCLite-> Yeni ('Sonuç_location' => './Test_17', id => 'Seks'); # Bu, CPA'yı arttırır. Burada olduğumuzu varsayıyoruz. $ satır}, hyp => hyp_readings {$ line}, sıralama_key => Getsort ($ satır)); $ golcü-> lines_push ($ l); } # dosya adlarının üzerinden dönmenin sonu. # Fiili ASR performansını hesaplar, B $ GLOKER-> Puan () # bir Wordy Report'u -> Sonuç_Location; # $ goler-> Rapor (); # Halen No-OP'den bu yana, SCLITE yardımcı programının içinde # raporlama işlevini çağırır. ########################################################################### # Örneğin eksiksizliği için aşağıda tanımlanmış oyuncak alt. alt read_trans {(% transkripsiyonlarım); açık (dosya, vardiya); # ya da ölen, elbette () {chomp; benim ($ trans, $ dosyası) = bölme; $ transkripsiyon {$ dosya} = $ trans; } dosyayı kapat; # veya ölür, tabii ki% transkripsiyon getirisi; } # Bu oyuncak sıralama rutini, hoparlörün seksini (varsayılan) hoparlör dizini yerine sıralama # tuşu olarak döndürür. sub gettor {benim ($ dosyaadı) = vardiya; iade ($ dosyaadı = ~ / bayan / i? 'Kadın': 'erkek'); } Gereksinimler: · Perl

Konuşma :: Tanıma :: Sclite İlgili Yazılım