Более короткий (без внешнего файла) вариант известного скрипта.