File: //usr/local/share/namazu/etc/HACKING-ja
CVS�ؤΥ�������
Anonymous CVS �Ǻǿ��Υ����������ɤ�ï�Ǥ����Ǥ��ޤ���
�ˡ�ϼ����̤�Ǥ���
% cvs -d :pserver:anonymous@cvs.namazu.org:/storage/cvsroot co -P namazu
�ޤ���2001-06-25��������� (2.0.x) �ȳ�ȯ�� (2.1.x) ��ʬ��
���ޤ����������ǤΥ���������ꤷ�������ˤ�
% cvs -d :pserver:anonymous@cvs.namazu.org:/storage/cvsroot co -r stable-2-0 namazu
�Ȥ��Ƥ���������
==============================================================
GNU Build Tools
CVS ������ꤷ�� Namazu �� make ����ˤϡ����餫����ʲ���
�ѥå����������ȡ��뤵��Ƥ���ɬ�פ�����ޤ���
- GNU m4 1.4
- GNU autoconf 2.50 (�⤷���Ϥ���ʾ�)
- GNU automake 1.6 (�⤷���Ϥ���ʾ�)
- GNU libtool 1.4 (�⤷���Ϥ���ʾ�)
- GNU gettext 0.13 (�⤷���Ϥ���ʾ�)
������� GNU �Υߥ顼(e.g. ftp://ftp.ring.gr.jp/pub/GNU)
���������뤳�Ȥ��Ǥ��ޤ���
CVS ���饽�������������顢�ޤ�autogen.sh ������ץȤ�¹�
���Ƥ���������
===============================================================
��å���������������μ��
1. ��po�ե������̤�����ʬ���������
2. ja_JP.SJIS.po �˴ؤ��Ƥϡ�ja.po �������� make_sjis_po ��
ɬ���¹Ԥ��롣����� ja.po �ˤ������ѹ��� ja_JP.SJIS.po �ˤ�
ȿ�Ǥ���롣
3. po �ʲ��ǡ�make update-po ��¹Ԥ��뤳�Ȥˤ�äơ��� po ��
namazu.pot ��Ʊ�������뤳�Ȥ��Ǥ��롣
����Ū�ˤϤ���η����֤��Ǥ���:)
�ʤ���GNU gettext 0.10.37 �ʹߤǤ� Big5 �� Shift_JIS ��ʸ�����
'\' �ǥ��������פ���ɬ�פϤʤ��ʤ�ޤ�������'\' �ǥ���������
���줿ʸ�����ޤ५�����������뤿��ˤϡ��Ķ��ѿ�
OLD_PO_FILE_INPUT ����� OLD_PO_FILE_OUTPUT ����ꤹ��ɬ�פ�
����ޤ�������Ū�ˤ�
% env OLD_PO_FILE_INPUT=yes OLD_PO_FILE_OUTPUT=yes make update-po
�ʤɤȤ��Ƥ���������
��������Namazu 2.0.18 �ʹߤϡ�'\' �ǥ��������פ��ʤ��褦�ˤ�
�ޤ����Τǡ��Ķ��ѿ���������� make update-po ��¹Ԥ��Ƥ�
��������
% make update-po
================================================================
Namazu �Υ����ǥ���§ - Perl��
mknmz��ͭ�λ���
* �ϥå���Υ�����ʸ����ǻ��ꤹ��Ȥ���ɬ�� '' �dz�롣��:
�� $NMZ{log} �� $NMZ{'log'}
=> log �Ȥ����ؿ���뤿�� perl 5.004 �Ǥ� warning ���Ф�
* debug��å���������Ϥ���Ȥ���ɬ��
util::dprint() ��Ȥ�
* verbose��å���������Ϥ���Ȥ���ɬ��
util::vprint() ��Ȥ�
* ���顼�ʤɤ��ͳ�� die ����Ȥ���ɬ��
util::cdie() ��Ȥ�
* �ե�������Ȥ��ˤ�ɬ�� util::efopen() (���顼�λ���
util::cdie() ����)�ޤ��� util::fopen() ��Ȥ�
* �ե�������Ĥ���Ȥ��ˤ�ɬ�� util::fclose() ��Ȥ�
* while (<>) {} �� while (<$fh>) {} ��ػߤ��롣$_ �ϥ���
�Х��ѿ�Ǥ��뤿�ᡢ���������
while (defined(my $line = <$fh>)) {} �Ȥ��롣
* ���ե��������Ȥ���ɬ��
my $tmpfile = util::tmpnam("NMZ.foobar");
�Ȥ��ư��ե������̾���������롣
* �ե��������Ȥ�ޤ뤴���ɤ߹���Ȥ��� util::readfile()
��Ȥ��� join '' <$fh> ���®���Ϥ���
* �ե������ rename ����Ȥ���ɬ�� util::Rename() ��Ȥ���
OS/2 ���
* �ץ�����Τ˱ƶ���ܤ������Х��ѿ��
lib/var.pl.in �������롣
* mknmz �����˱ƶ���ܤ������Х��ѿ��
src/mknmz.pl.in �������롣 $SYSTEM �Τ��㳰��
* �桼���� mknmz.conf, ~/.mknmzrc �ˤ��ѹ��������Ǥ�����
��� lib/conf.pl.in �������롣
��ˡ
* ɬ�� -w ���ץ������Ѥ���
#! /usr/bin/perl -w
* ɬ�� use strict ����
* local() �ϻȤ�ʤ�
* �ѿ�ϻȤ����֤������
- C����Τ褦�˥֥�å��κǽ�������ɬ�פϤʤ�
* �ѿ������ˤϤǤ���¤������Ԥ�
* for �� for my $tmp (@foo) { ... } �Τ褦���Ѥ���
- my $tmp ����ʬ���� ($tmp�Υ������פ�롼����˸��ꤹ��)
* ����ͤ��ۤ� return ����
- ���֥롼����Ǹ�μ��� return ����롢�Ȥ����롼������ʤ�
* built-in�ؿ�ƤӽФ��κݤϾ�ά�Ǥ���ݳ�̤ϤǤ������ʤ�
- �� substr $str, $offset, $len; �� substr($str, $offset, $len)
* ����ɽ���Ǥ� $&, $', $` ��Ȥ�ʤ�
- �ץ�����Τ��٤��ʤ뤿��
* ���֥롼����θƤӽФ��� foobar() �Ȥ���
- &foobar ���Բ� ("&" ������)
* ���֥롼��������Ǥϥץ�ȥ��������Ԥ�
- sub foobar($$$) { ... } �Τ褦��
* $_ �ϤǤ���¤�Ȥ�ʤ�
- $_ �ϥ����Х��ѿ�ʤΤǴ�
* open() �ϻȤ�ʤ��� use IO::File ���Ѥ���
my $fh = new IO::File; $fh->open() �Ȥ���
* �ե������ destructor �ˤޤ��������ۤ��Ĥ���
- util::fclose() ���Ѥ��� (2.0.13 �ʹ߲���)
* ��ե�����礤�˳��Ѥ���
* ��¸�� perl module ����Ѥ���
- ���ؤκ�ȯ��ʤ�
* $| �Ȥ��ä��ü��ѿ�ϤǤ������Ѥ��ʤ�
- $| �� STDOUT->autoflush(1) �����ѤǤ���
* �����Х��ѿ�ϤǤ������Ȥ�ʤ�
* �����ɤϤǤ���¤�⥸�塼�벽����
- API�����Ƴ�ĥ���ưפˤ���
* ɬ�פ˱����� Object Oriented Programming ��������
- ���٤Ƥ� OOP �ǽ��ȤϤʤ�
* Ĺ������ɽ���ˤ�Ŭ�� /x ��ǥ��ե�������Ŭ�Ѥ���
* �ѿ��Ȥä�����ɽ���ˤϰ���ʤ� /o ��ǥ��ե�������Ŭ��
����
* �����ȤϱѸ�ǽ�
̾����§
* �ƥ�ݥ����ѿ�Ϸ�����鷺 tmp �Ȥ���̾���ˤ���
* for ʸ�Υ����ˤ� $i, $j, $k ���Ѥ���
- 3�ʤ�꿼�����ʤ��褦�˵���Ĥ���
* ���֥롼����̾��ư�� (+��Ū��)���ѿ�̾��̾��
- e.g. update_registry()
* ���Ϣ��ˤϥ���������� ('_') ���Ѥ���
- e.g. get_os_name(), $os_name
* �ɽ��ѿ��̾���Ͼ�ʸ��
* �����Х��ѿ��̾���� capitalize ������������������
ά���� (��Ƥ)
- $IndexType
* ���ϥå�����ѿ�̾��ʣ��ˤ��� (��Ƥ)
- @files
* �ѿ�̾�ζ�ü�ʾ�ά�Ϥ��ʤ�
- $on (OS name) �ʤɤ��Բ�
* ����ɬ�פ˱����ƾ�ά���� (��Ƥ)
* ��ά�Υ롼�����β�����
- file handle -> fh
- pointer -> ptr
- index -> idx
- current -> cur
- protocol -> proto
- length -> len
- string -> str
- argument -> arg
- source -> src
- destination -> dest
- control -> ctrl
- module -> mod
- language -> lang
- initialize -> init
- variable -> var
- ¾�ˤ⤢����ɲä���
* package ���ۤʤ��Ʊ�����֥롼����̾���Ѥ����ɤ�
����ǥ��
* ����ǥ�Ȥ� 4ʸ��ñ��
$foo = 1 + 2 + 3;
$bar = ((1 + 2) + 3) * 4;
if ($foo == $bar) {
print foobar($foo, $bar), "\n";
} else {
die "error";
}
sub foobar ($$) {
my ($foo, $bar) = @_;
return $foo + $bar;
}
Perl��Ϣ���
* CPAN
<ftp://ring.asahi-net.or.jp/archives/lang/perl/CPAN/>
* Perl Style
<ftp://ftp.dti.ad.jp/pub/lang/CPAN/doc/FMTEYEWTK/style/slide-index.html>
* perl5.005_02�Υɥ������
<http://www.kt.rim.or.jp/%7ekbk/perl5.005/index.html>
* perl5.004_04�Υɥ������
<http://www.kt.rim.or.jp/%7ekbk/perl5.doc/index.html>
* Perl information memo
<http://www.st.rim.or.jp/~cond/perlinfo/index.html>
* /pub/IIJ/dist/utashiro/perl directory
<ftp://ftp.iij.ad.jp/pub/IIJ/dist/utashiro/perl>
* /pub/lang/CPAN/authors/Hirofumi_Watanabe directory
<ftp://ftp.dti.ad.jp/pub/lang/CPAN/authors/Hirofumi_Watanabe>
* FMTEYEWTK
<ftp://ftp.dti.ad.jp/pub/lang/CPAN/doc/FMTEYEWTK/index.html>
* Yahoo! - Computers and Internet:Programming Languages:Perl
<http://www.yahoo.co.jp/Computers_and_Internet/Programming_Languages/Perl/>
* JPerl for Win32
<http://www.yk.rim.or.jp/~hizumi/perl/index.html>
* Index of /archives/lang/perl/CPAN/modules/by-authors/Gurusamy_Sarathy
<http://ring.nacsis.ac.jp/archives/lang/perl/CPAN/modules/by-authors/Gurusamy_Sarathy/>
* Learning Perl/Tk
<http://tanaka-www.cs.titech.ac.jp/~ueki/PerlTk/index.html>
* ActiveState Tool Corp. - Professional tools for Perl developers
<http://www.activestate.com/>
* Index of /archives/lang/perl/CPAN/modules/by-module/Tk
<http://ring.nacsis.ac.jp/archives/lang/perl/CPAN/modules/by-module/Tk/>
* What's wrong with Perl
<http://www.stud.ifi.uio.no/~larsga/download/artikler/perl.html>