Склонение слов за числительным при помощи Perl, PHP, Javascript

Многие из начинающих программистов на любом языке часто сталкиваются c тем, что необходимо склонять слова, следующие за числительным. Например: «Нет ответов», «1 ответ», «2 ответа», «5 ответов». Конечно, всегда можно указать так: «Ответов: 0″, «Ответов: 1″, «Ответов: 2″, «Ответов: 5″. Однако мне это говорит не об успешности такого программиста, а как раз о его лени. Ведь что стоит написать простую функцию, которая будет возвращать значение слова, в зависимости от числительного.

Ниже представлены варианты реализации на разных языках:

Perl

Пользоваться такой функцией можно следующим образом:

Где переменная $online содержит число пользователей на сайте.