argra****@users*****
argra****@users*****
2008年 5月 22日 (木) 04:59:31 JST
Index: docs/perl/5.6.1/perlop.pod diff -u docs/perl/5.6.1/perlop.pod:1.13 docs/perl/5.6.1/perlop.pod:1.14 --- docs/perl/5.6.1/perlop.pod:1.13 Fri Apr 18 21:16:17 2008 +++ docs/perl/5.6.1/perlop.pod Thu May 22 04:59:30 2008 @@ -1,3 +1,4 @@ + =encoding euc-jp =head1 NAME @@ -4481,3 +4482,10 @@ =cut +=begin meta + +Translate: 吉村 寿人 <JAE00****@nifty*****> (5.000) +Update: Kentaro Shirakata <argra****@ub32*****> (5.6.1-) +License: GPL or Artistic + +=end meta Index: docs/perl/5.6.1/perlsub.pod diff -u docs/perl/5.6.1/perlsub.pod:1.2 docs/perl/5.6.1/perlsub.pod:1.3 --- docs/perl/5.6.1/perlsub.pod:1.2 Tue Jul 24 01:38:12 2007 +++ docs/perl/5.6.1/perlsub.pod Thu May 22 04:59:30 2008 @@ -1277,16 +1277,16 @@ =begin original -+then C<mypush()> takes arguments exactly like C<push()> does. The -+function declaration must be visible at compile time. The prototype -+affects only interpretation of new-style calls to the function, -+where new-style is defined as not using the C<&> character. In -+other words, if you call it like a built-in function, then it behaves -+like a built-in function. If you call it like an old-fashioned -+subroutine, then it behaves like an old-fashioned subroutine. It -+naturally falls out from this rule that prototypes have no influence -+on subroutine references like C<\&foo> or on indirect subroutine -+calls like C<&{$subref}> or C<< $subref->() >>. +then C<mypush()> takes arguments exactly like C<push()> does. The +function declaration must be visible at compile time. The prototype +affects only interpretation of new-style calls to the function, +where new-style is defined as not using the C<&> character. In +other words, if you call it like a built-in function, then it behaves +like a built-in function. If you call it like an old-fashioned +subroutine, then it behaves like an old-fashioned subroutine. It +naturally falls out from this rule that prototypes have no influence +on subroutine references like C<\&foo> or on indirect subroutine +calls like C<&{$subref}> or C<< $subref->() >>. =end original @@ -1925,8 +1925,8 @@ =begin meta -Created: KIMURA Koichi -Updated: Kentaro Shirakata <argra****@ub32*****> +Translate: KIMURA Koichi (5.005_03) +Update: Kentaro Shirakata <argra****@ub32*****> (5.6.1-) =end meta Index: docs/perl/5.6.1/perlvar.pod diff -u docs/perl/5.6.1/perlvar.pod:1.9 docs/perl/5.6.1/perlvar.pod:1.10 --- docs/perl/5.6.1/perlvar.pod:1.9 Wed Dec 13 12:47:33 2006 +++ docs/perl/5.6.1/perlvar.pod Thu May 22 04:59:30 2008 @@ -999,7 +999,6 @@ =item C<$3> は C<substr $var, $-[3], $+[3] - $-[3])> と同じです。 - =back =item format_name HANDLE EXPR @@ -1151,6 +1150,11 @@ =end original +C<END> サブルーチンの内側では C<$?> には C<exit()> に渡されようとしている +値を含みます。 +プログラムの終了ステータスを変更するために、C<END> サブルーチン 内で +C<$?> を変更できます。 +例えば: END { $? = 1 if $? == 255; # die would make it 255 @@ -1379,7 +1383,8 @@ =end original -本プロセスの実効 uid を示します、 例: +本プロセスの実効 uid を示します。 +例: $< = $>; # set real to effective uid ($<,$>) = ($>,$<); # swap real and effective uid @@ -1857,7 +1862,7 @@ =end original とすると緊急用の 64K のバッファを割り当てます。 -このオプションを有効にする方法ｎついての情報は +このオプションを有効にする方法についての情報は Perl 配布パッケージに含まれている F<INSTALL> ファイルを参照して下さい。 この拡張機能を気軽に使えないようにするために、 この変数には L<English|English> の長い名前はありません。 @@ -2796,3 +2801,12 @@ 例外ハンドラの中で C<$^S> を使おうなどとは考えてもいけません。 現在の実装の C<$SIG{__DIE__}> は面倒を引き寄せ、エラーの追跡を困難にします。 これの代わりに C<END{}> を使うか、CORE::GLOBAL::die をオーバーライドしてください。 + +=begin meta + +Translate: 吉村 寿人 <JAE00****@nifty*****> (5.000) +Update: Kentaro Shirakata <argra****@ub32*****> (5.6.1-) +License: GPL or Artistic + +=end meta +
