�ڤȰ�ȥ��ܤ˵��졢�������Dzᤴ������Ϣ�٤κǸ�򤷤᤯���뤫�Τ褦�����ۥܥå��������äƤ����Τ������顣

404 Blog Not Found:Mastering Algorithms with Perl-siuye���������
java�Ǥ���ǯ���ФƤޤ����衣�䥢�르�ꥺ�༭ŵ

�򸫤���ʸ�Τ��ܽ��java�ˤ�륢�르�ꥺ���ŵ�ס��ʤΤ�����....

����ϡ��襤���礷�Ť餤��

�ޤ��������ɡ����ޤ�ˡ�C����ˤ��ǿ����르�ꥺ���ŵ�פ���Υ��ԥڤ�¿����

int main (int argc, char **argv){
   /* �����ɤϤ����� */
}

��

class Example{
  public void main(String[] args){
    /* �����ɤϤ����� */
  }
}

�ˤ��������Τ�Τ����ʤ����ʬ�����롣�Ϥ���ơֺǿ����르�ꥺ���ŵ�פ���ä��ͤˤϤ���Ǥ⤤�������Τ�ʤ�������C����ˤ��פ����򤹤Ǥ��ɤ�Ǥ���ͤ�orz������������ɥ����饮�å���ǥ�������!?��

���ˡ������ǥ��󥰥������롣

�¤ϡ�C����ˤ��פ����⡢���르�ꥺ��μ�����ŵ�Ȥ��Ƥ�ɾ�����Ƥ⡢�����ǥ��󥰥�����������ǤϤ��ޤ�ɾ���Ǥ��ʤ��ä���main(){}�˥��르�ꥺ��򤯤��Ȥ������ϡ����Τޤްܤ��Ƥ��Τޤ�ư���Ȥ������ǤϤ褯�Ƥ⡢�Ȥ��󤹤Ȥ������Ǥ����˻Ȥ��Ť餤����C����ˤ��פ��Ф�1991ǯ�Ȥ����Τϡ��ޤ����󥿡��ͥåȤϤʤ����ѥ������̿��������Ǥ��ꡢ���Υ�������ϸ��줷���Ƥ������ʤ��ȻפäƤ����������줫�齽��ٰ����2003ǯ�˽Ф��ܤ�����Ǥϵ㤱�Ƥ��롣

�ޤ��Ƥ䡢���٤�C�ǤϤʤ�Java�ǡ�Ʋ���ȥ��饹��Ȥ��롣���르�ꥺ���������륯�饹�����񤱤С��ܽ�ϤӤ��äȰ������ޤ��Τˤʤä��Ϥ������Ȥ������������ɤ�¿���Ͼ嵭�ΤȤ��ꡢ�̥��饹�˼���������Τ⡢���饹���ʿ����System.out.println()���ФƤ��롣�������ɥ�ɥ��ɡ���!����δ��Ԥϡ�������ʬ�ˤ����ƺǤ�΢�ڤ�줿��

�ȤϤ�������C����ˤ��פ˺ܤäƤ��ʤ����르�ꥺ���빽���롣�ä˰Ź�ϤΥ��르�ꥺ��ϡ���C����ˤ��פ����ǤϤ��ޤ꿨����Ƥ��ʤ��ä������ˡ������Υ��르�ꥺ��ˤ⿨�줿���ɼԤˤϲ��ͤϤ����������

����Ǥ⡢������º�ɤ����¼����������Ǥ⡢��Ϥ��Ȥ��Ƥ�[����ϤҤɤ�]������Ĥ���������ʤ������줬�ʤ�ñ���ǤϤʤ������ǡ�java�ʤΤ��ȹͤ���йͤ���ۤɡ���襵���ɤΰ°פ���ɤ�ܤΥɥ��祦��������ٿ䤻����򤨤ʤ�����ɤ�ܤΥɥ��祦�ʤ餤���������������Ϥ���ޤ�ʤΤ���������

�ºݡ�21�����ˤ����륢�르�ꥺ��μ����λȤ�����Ȥ����Τϡ��ɼԤ���ʬ�Ǥ��Υ��르�ꥺ���ʬ�Υץ��������Ȥ߹��ࡢ�Ȥ����ΤǤϤʤ����饤�֥�꡼�η����󶡤����ۤȤ�ɤοͤϤ������Ȥ��Ȥ��������Ѳ����Ƥ��롣������С��ܽ����ꤹ�٤��ɼԤ⺣�ޤǤȤϰ㤦���ܽ���ɼԤϰ�������֥ץ��١פ��⤤�Τ���Perl���㤨���Newbies�ǤϤʤ�CPAN Authors�ʤΤ���

java-okumura

��������ͤ���С���Ϥ��������ߤ����Τ��ܽ�ǤϤʤ������̥�˥塼���뤷����C����ˤ��ǿ����르�ꥺ���ŵ�פʤΤ���Java�Ϻ��ΤȤ�������Java�ǽ񤤤��饤�֥�꡼��¾�θ���ǻȤ��פȤ������ˤϿʲ����Ƥ��ʤ�(JPL�ʤɤλ�ߤϤ��ä���)���ष��Jython�ˤ���Groovy�ˤ�������java��¾�θ�����������פȤ��������˹ԤäƤ��롣����Ϥ����̣java���ä�C�˴����褦�Ȥ���ư���ʤΤ���������Ǥ�Python�ϤȤˤ�����Perl��Ruby�ǤϻȤ��ˤ�����C�Ǥ����SWIG�⤢�뤷��SWIG�Ǥʤ��Ȥ�C�ǽ񤫤줿�饤�֥�꡼�˥�����������Τ��ưפǤ��롣��äȤ��ܽ�˼��夲��줿���르�ꥺ��μ����ΤۤȤ��(���뤤������)��CPAN�����ä�į���нФƤ���ΤǤ⤢�뤱��ɤ⡣

�Ȥ����ǡ�����Ϥ��Ĥ�Ȥϰ㤦������ä���

���ΤȤ��ꡢ��ꥳ��ѥ��Ȥ������ο��礭��Ȣ���ϳμ¤��ʥܡ���ξ������Ѥ⾯�ʤ��������⤺�äȳڤ��ä���Frequent User�Ȥ��ƴ��ޤ��Ƥ��롣

Dan the Man with too Many Languages to Write

�ɵ�:��C����ˤ��פ����ˤϤΤäƤ������餤�ޤ路�ؿ����ܽ�Ǿä��Ƥ����Τ��ǰ�˻פ��������ˤ���Java�ˤ�������Benchmark��ܤ��Ƥ������Ȥˤ��롣�ʤ����¹� �Ķ���PowerBook����MacBook Pro���Ѥ�ä��Τǡ����ͤޤǤ�C��Perl�Υ٥���ޡ����⡣

Tarai.java
class Tarai{
    static int tak(int x, int y, int z){
        return (x <= y) ? y : tak( tak (x-1, y, z),
                                   tak (y-1, z, x),
                                   tak (z-1, x, y) );
    }
    static int x = 10;
    static int y =  5;
    static int z =  0;
    public static void main(String[] args){
        if (args.length >= 3){
            x = Integer.parseInt(args[0]);
            y = Integer.parseInt(args[1]);
            z = Integer.parseInt(args[2]);
        }
        System.out.println(
            "tak(" + x + ", " + y + ", " + z + ") = " + tak(x, y, z)
            );
    }
}
% /usr/bin/time ./tarai.cx 12 6 0
tak(12, 6, 0) = 12
        0.14 real         0.13 user         0.00 sys
% /usr/bin/time perl tarai.pl 12 6 0
tak(12, 6, 0) = 12
       19.43 real        18.06 user         0.72 sys
% /usr/bin/time ./tarai.cx 12 6 0
tak(12, 6, 0) = 12
        0.14 real         0.13 user         0.00 sys

�ʤ��ʤ�ͥ���Ǥ��롣