
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ͭλ

  * ϥåΥʸǻꤹȤɬ '' ǳ롣:
     $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>
