Сообщество IT-специалистов
Ответы на любые вопросы об IT
Профессиональное развитие в IT
Удаленная работа для IT-специалистов
perl -le 'use bytes; local $/; $s+=ord $_ for map {split //, $_} <>; print $s' < /path/to/filename
