Back to task

32 symbols perl
Tue Feb 27 20:15:41 2018 k-mx
#!/usr/bin/perl -p
s/\w/$z+=ord(lc$&)-96/eg;$_=$z


Leave a comment

Parsed as Markdown

Login to leave a comment