[PERL] calculate the frequency of commonly used words

Untuk suatu keperluan tertentu semisal kuisioner dan pembuatan tangga lagu, terkadang kita membutuhkan proses penghitungan frekuensi seberapa sering kata-kata dalam suatu file sering keluar.

Maka dari itu saya membuat skrip yang bisa menyelesaikan masalah tersebut. Secara garis besar, skrip ini memiliki alur sebagai berikut :
- membuka file
- membaca isi file
- menghitung seberapa sering sebuah kata keluar / dipakai
- menampilkannya dalam urutan descending, di mana kata yang paling sering keluar akan ditampilkan di urutan paling atas
- menampilkan hasil proses tersebut ke sebuah file html agar mudah dibaca di browser

Berikut ini screenshootnya :

hasilnya :

semoga menginspirasi……