알파벳으로 보는 100점 짜리 인생

C입니다. gcc -Wall에서 워닝 한 개 나지만...

#include <ctype.h>
int main(int c,char*v[],char*p)
{
	return v?(c==2?main(0,0,v[1]):0):*p?main(c+(isalpha(*p)?toupper(*p)-'A'+1:0),0,p+1):c;
}

Administrator@sjlee:~$ gcc -Wall jin.c -ojin
jin.c:5: warning: third argument of `main' should probably be `char **'
Administrator@sjlee:~$ ./jin knowledge; echo $?
96
Administrator@sjlee:~$ ./jin attitude; echo $?
100
Administrator@sjlee:~$ ./jin musuko; echo $?
100
Administrator@sjlee:~$

물론, 평소엔 이렇게 안 짭니다 :twisted:

jindaeje=lambda s:sum([ord(c)-64 for c in s.upper()if'@'<c<'['])

파이썬 버전이고, 2.4 이하의 버전에서도 돌아 갑니다 :) lambda 부분의 길이는 55바이트입니다. 2.4에서만 돌아 가는 버전은 2바이트 더 작습니다.

jindaeje=lambda s:sum(ord(c)-64 for c in s.upper()if'@'<c<'[')

이런 종류의 코드 만드시는 분들께서 간과하시는 것이 알파벳 말고 다른 글자가 들어 오는 경우를 처리하지 못 한다는 것이죠 :) 예외 처리를 잘 합시다아.

- 토끼군

알파벳은 무조건 소문자로 바꾸고 그 이외는 제거하고
점수를 매기는 함수입니다.

#!/usr/bin/perl

print grade_word("Spider man");
print "\n";
print grade_word("spiderman");

sub grade_word
{
    my $grade = 0;
    my $word = lc($_[0]);
    $word =~ tr/^a-z//cd;
    $grade+=($_-96) for (unpack("C*",$word));
    return $grade;
}

결과

99
99

function convert_num($str) 
{ 
    $ret = 0; 
    $str = strtolower($str); 

    if ( strcmp($str, 'gamja9e') == 0 ) 
        return 9999;

    for ( $i = 0; $i < strlen($str); $i++) 
    { 
        $value = ord($str[$i])-96; 
        if ( 0 < $value and $value < 27 ) 
            $ret += $value; 
    } 
    return $ret; 
}

-_-;;