argra****@users*****
argra****@users*****
2008年 12月 4日 (木) 02:11:12 JST
Index: docs/perl/5.10.0/perlapio.pod
diff -u docs/perl/5.10.0/perlapio.pod:1.4 docs/perl/5.10.0/perlapio.pod:1.5
--- docs/perl/5.10.0/perlapio.pod:1.4 Wed Dec 3 01:46:55 2008
+++ docs/perl/5.10.0/perlapio.pod Thu Dec 4 02:11:11 2008
@@ -133,11 +133,10 @@
=end original
-All above are #define'd to stdio functions or are trivial wrapper
-functions which call stdio. In this case I<only> PerlIO * is a FILE *.
-This has been the default implementation since the abstraction was
-introduced in perl5.003_02.
-(TBT)
+上記の全ては stdio 関数への #define か、stdio を呼び出すためのありふれた
+ラッパ関数です。
+この場合 I<のみ>、PerlIO * は FILE * です。
+抽象化が導入された perl5.003_02 以来、これがデフォルトの実装でした。
=item 2. USE_SFIO
@@ -150,11 +149,11 @@
=end original
-A "legacy" implementation in terms of the "sfio" library. Used for
-some specialist applications on Unix machines ("sfio" is not widely
-ported away from Unix). Most of above are #define'd to the sfio
-functions. PerlIO * is in this case Sfio_t *.
-(TBT)
+"sfio" ライブラリに関して、「レガシーな」実装です。
+Unix マシンでの特殊なアプリケーションで使われています
+("sfio" Unix 以外にはあまり移植されていません)。
+上記のほとんどは sfio 関数への #define です。
+この場合、PerlIO * は Sfio_t * です。
=item 3. USE_PERLIO
@@ -171,7 +170,7 @@
=end original
-Introduced just after perl5.7.0, this is a re-implementation of the
+perl5.7.0 の直後に導入され、this is a re-implementation of the
above abstraction which allows perl more control over how IO is done
as it decouples IO from the way the operating system and C library
choose to do things. For USE_PERLIO PerlIO * has an extra layer of
@@ -188,9 +187,8 @@
=end original
-This is the only implementation for which C<PerlIO_apply_layers()>
-does anything "interesting".
-(TBT)
+これは C<PerlIO_apply_layers()> が何か「興味ある」ことを行う唯一の
+実装です。
=begin original
@@ -210,8 +208,8 @@
=end original
-"perlio.h" は(効率のために)薄い層なので、これらの関数の意味は基礎となる
-実装に若干依存しています。
+"perlio.h" は(効率のために)薄い層になっているので、これらの関数の意味は
+基礎となる実装に若干依存しています。
Where these variations are understood they are noted below.
(TBT)
@@ -259,7 +257,8 @@
=end original
fopen()/fdopen() に対応し、同じ引数を取ります。
-Return C<NULL> and set C<errno> if there is an error. There may be an
+エラーの場合は C<NULL> を返し、C<errno> をセットします。
+There may be an
implementation limit on the number of open handles, which may be lower
than the limit on the number of open files - C<errno> may not be set
when C<NULL> is returned if this limit is exceeded.
@@ -287,8 +286,8 @@
=end original
Perl prefers to C<dup> the new low-level descriptor to the descriptor
-used by the existing PerlIO. This may become the behaviour of this
-function in the future.
+used by the existing PerlIO.
+これは将来この関数の振る舞いになるかもしれません。
(TBT)
=item B<PerlIO_printf(f,fmt,...)>, B<PerlIO_vprintf(f,fmt,a)>
@@ -346,11 +345,10 @@
=end original
-Returns a byte count if successful (which may be zero or
-positive), returns negative value and sets C<errno> on error.
-Depending on implementation C<errno> may be C<EINTR> if operation was
-interrupted by a signal.
-(TBT)
+成功時にはバイトカウント(ゼロか正の数です)を返し、エラー時には負の数を
+返して C<errno> をセットします。
+実装に依存して、もし操作がシグナルで中断した場合は C<errno> は C<EINTR> に
+なるかもしれません。
=item B<PerlIO_close(f)>
@@ -412,9 +410,8 @@
=end original
getc() に対応します。
-Despite the c in the name only byte range 0..0xFF is supported.
-Returns the character read or -1 (C<EOF>) on error.
-(TBT)
+名前に c がありますが、バイトの範囲 0..0xFF にのみ対応しています。
+読み込んだ文字か、エラーの場合は -1 (C<EOF>) を返します。
=item B<PerlIO_eof(f)>
@@ -428,11 +425,10 @@
=end original
feof() に対応します。
-Returns a true/false indication of
-whether the handle is at end of file. For terminal devices this may
-or may not be "sticky" depending on the implementation. The flag is
-cleared by PerlIO_seek(), or PerlIO_rewind().
-(TBT)
+ハンドルがファイルの最後かどうかを示す真か偽を返します。
+端末デバイスでは、実装に依存して、これは "sticky" かもしれませんし、
+そうではないかもしれません。
+フラグは PerlIO_seek() か PerlIO_rewind() で解除されます。
=item B<PerlIO_error(f)>
@@ -563,13 +559,12 @@
=end original
それぞれ (大まかに) ftgetpos() と fsetpos() に対応します。
-Rather than
-stdio's Fpos_t they expect a "Perl Scalar Value" to be passed. What is
-stored there should be considered opaque.
+stdio のFpos_t と違って、これらは「Perl スカラ値」が渡されることを
+想定しています。
+ここで保存されるものは内部が見えないものとみなれさます。
データのレイアウトはハンドルによってさまざまです。
stdio を使わない場合や、プラットフォームが stdio 呼び出しを持っていない
場合にはこれらの関数は PerlIO_tell()、PerlIO_seek() によって実装されます。
-(TBT)
=item B<PerlIO_rewind(f)>
@@ -603,14 +598,13 @@
tmpfile() に対応し、無名 PerlIO (エラー時は NULL) を返します。
システムはファイルがクローズされると自動的にファイルを削除しようとします。
-On Unix the file is usually C<unlink>-ed just after
-it is created so it does not matter how it gets closed. On other
-systems the file may only be deleted if closed via PerlIO_close()
-and/or the program exits via C<exit>. Depending on the implementation
-there may be "race conditions" which allow other processes access to
-the file, though in general it will be safer in this regard than
-ad. hoc. schemes.
-(TBT)
+Unix では、ファイルは普通作成された直後に C<unlink> されるので、どうやって
+クローズされるかは気にされません。
+その他のシステムでは、ファイルは PerlIO_close() で閉じられるか、プログラムが
+C<exit> で終了されたときにのみ削除されます。
+実装に依存して、他のプロセスがこのファイルにアクセスできるという
+「競合条件」が起こりえますが、一般的にはその場限りの仕組みよりこれの方が
+より安全でしょう。
=item B<PerlIO_setlinebuf(f)>
@@ -649,10 +643,9 @@
=end original
PerlIO と stdio との共存をサポートするためのアウトラインがあります。
-明らかに PerlIO が stdio を使って実装されているのであれば、問題はありません。
-しかし、その他の場合では stdio 呼び出しを使おうとする
-ライブラリコードに渡すことができる FILE * を作成する機構が
-なければなりません。
+PerlIO が stdio を使って実装されているのであれば、明らかに問題はありません。
+しかし、その他の場合では stdio 呼び出しを使おうとするライブラリコードに
+渡すことができる FILE * を作成する機構がなければなりません。
=begin original
@@ -686,8 +679,8 @@
=end original
XS code is probably better using "typemap" if it expects FILE *
-arguments. The standard typemap will be adjusted to comprehend any
-changes in this area.
+arguments.
+標準の typemap は、この分野でのあらゆる変更を把握するために調整されます。
(TBT)
=over 4
@@ -712,12 +705,10 @@
=end original
-The mode argument should be a string as would be passed to
-fopen/PerlIO_open. If it is NULL then - for legacy support - the code
-will (depending upon the platform and the implementation) either
-attempt to empirically determine the mode in which I<f> is open, or
-use "r+" to indicate a read/write stream.
-(TBT)
+mode 引数は fopen/PerlIO_open に渡される文字列であるべきです。
+もしこれが NULL なら - レガシーサポートのために - コードは
+(プラットフォームと実装に依存して) I<f> がオープンされるモードを経験的に
+決定しようとするか、読み書きストリームを示すために "r+" が使われます。
=begin original
@@ -780,11 +771,9 @@
‘export’された FILE * は(通常は新しい :stdio 「層」を PerlIO * に
プッシュすることで)記録され、それ以後のオリジナルの
PerlIO * に対する PerlIO 操作に影響を及ぼす可能性があります。
-You should not
-call C<fclose()> on the file unless you call C<PerlIO_releaseFILE()>
-to disassociate it from the PerlIO *. (Do not use PerlIO_importFILE()
-for doing the disassociation.)
-(TBT)
+PerlIO * との関連付けを解除するために C<PerlIO_releaseFILE()> を
+呼び出さずに C<fclose()> を呼び出すべきではありません。
+(関連付けの解除のために PerlIO_importFILE() を使ってはいけません。)
=begin original
@@ -867,9 +856,9 @@
or writing code which can make use of the "read ahead" that
has been done by the IO system in the same way perl does
についてのみ注目します。
-Note that
-any code that uses these interfaces must be prepared to do things the
-traditional way if a handle does not support them.
+これらのインターフェースを使うコードは、もしハンドルがこれらに
+対応していないなら、伝統的な方法で準備しておく必要があることに
+注意してください。
(TBT)
=over 4
@@ -932,11 +921,9 @@
=end original
バッファ中にある次の読み出し可能バイトへのポインターを返します;
-accessing via the
-pointer (dereferencing) is only safe if PerlIO_get_cnt() has returned
-a positive value. Only positive offsets up to value returned by
-PerlIO_get_cnt() are allowed.
-(TBT)
+ポインタ経由のアクセス(デリファレンス)は、PerlIO_get_cnt() が
+正の数を返した場合にのみ安全です。
+PerlIO_get_cnt() で返される値以下の正の数のオフセットのみが使えます。
=item B<PerlIO_set_ptrcnt(f,p,c)>
@@ -953,10 +940,8 @@
ポインターをバッファにセットし、バッファにあるバイト数はそのままです。
以前の C<PerlIO_get_ptr> と C<PerlIO_get_cnt> の呼び出しから
推測される範囲内のポインターをセットすることのみに使うべきでしょう。
-The two
-values I<must> be consistent with each other (implementation may only
-use one or the other or may require both).
-(TBT)
+2 つの値は互いに I<一貫していなければなりません>
+(実装はどちらか片方だけを使うかもしれませんし、両方が必要かもしれません)。
=item B<PerlIO_canset_cnt(f)>
@@ -1017,9 +1002,8 @@
=end original
バッファの I<開始位置> を返します。
-Access only positive offsets in the buffer
-up to the value returned by PerlIO_get_bufsiz().
-(TBT)
+バッファの中で、PerlIO_get_bufsiz() で返される値以下の正数のオフセットで
+のみアクセスできます。
=item B<PerlIO_get_bufsiz(f)>
@@ -1102,10 +1086,9 @@
=end original
-B<layers> is a string of layers to apply, only ":crlf" makes sense in
-the non USE_PERLIO case. (As of perl5.8 ":raw" is deprecated in favour
-of passing NULL.)
-(TBT)
+B<layers> は適用される層の文字列で、USE_PERLIO 以外の場合では ":crlf" のみが
+意味を持ちます。
+(perl5.8 以降、":raw" は非推奨で、NULL を渡すことが好まれます。)
=begin original
@@ -1162,9 +1145,8 @@
=end original
-PerlIO_debug writes to the file named by $ENV{'PERLIO_DEBUG'} typical
-use might be
-(TBT)
+PerlIO_debug は$ENV{'PERLIO_DEBUG'} で指定されたファイルに書き込みます。
+典型的な使い方は:
Bourne shells (sh, ksh, bash, zsh, ash, ...):
PERLIO_DEBUG=/dev/tty ./perl somescript some args
Index: docs/perl/5.10.0/perldata.pod
diff -u docs/perl/5.10.0/perldata.pod:1.1 docs/perl/5.10.0/perldata.pod:1.2
--- docs/perl/5.10.0/perldata.pod:1.1 Wed Dec 3 01:51:58 2008
+++ docs/perl/5.10.0/perldata.pod Thu Dec 4 02:11:11 2008
@@ -656,11 +656,9 @@
評価したときに C<1/16> が得られれば、16 のうち一つのエントリだけが使われ、
おそらくそこに 10,000個 すべてが入っていることを意味します。
これはほとんど起こりそうもないことです。
-If a tied hash
-is evaluated in scalar context, a fatal error will result, since this
-bucket usage information is currently not available for tied hashes.
+tie したハッシュがスカラコンテキストで評価されると、この使用バケツ情報は
+現在のところ tie したハッシュでは利用できないので、致命的エラーとなります。
X<hash, scalar context> X<hash, bucket> X<bucket>
-(TBT)
=begin original
@@ -807,12 +805,11 @@
=end original
-By default floating point numbers substituted inside strings use the
-dot (".") as the decimal separator. If C<use locale> is in effect,
-and POSIX::setlocale() has been called, the character used for the
-decimal separator is affected by the LC_NUMERIC locale.
-See L<perllocale> and L<POSIX>.
-(TBT)
+デフォルトでは、文字列に置換された浮動小数点数は小数点としてドット (".") を
+使います。
+C<use locale> が有効で、POSIX::setlocale() が呼び出されている場合、
+小数点として使われる文字は LC_NUMERIC ロケールによって影響を受けます。
+L<perllocale> と L<POSIX> を参照してください。
=begin original
Index: docs/perl/5.10.0/perlmod.pod
diff -u docs/perl/5.10.0/perlmod.pod:1.1 docs/perl/5.10.0/perlmod.pod:1.2
--- docs/perl/5.10.0/perlmod.pod:1.1 Wed Dec 3 17:57:07 2008
+++ docs/perl/5.10.0/perlmod.pod Thu Dec 4 02:11:11 2008
@@ -1011,7 +1011,7 @@
=end original
こうしてから宣言に移れば、関数の中で変数を修飾しないでも使うことができます。
-モジュールの悪性に関する仕組みやスタイルに関する詳細は
+モジュールの作成に関する仕組みやスタイルに関する詳細は
L<Exporter> と L<perlmodlib> を参照してください。
=begin original
Index: docs/perl/5.10.0/perlvar.pod
diff -u docs/perl/5.10.0/perlvar.pod:1.7 docs/perl/5.10.0/perlvar.pod:1.8
--- docs/perl/5.10.0/perlvar.pod:1.7 Wed Dec 3 01:46:55 2008
+++ docs/perl/5.10.0/perlvar.pod Thu Dec 4 02:11:11 2008
@@ -196,12 +196,11 @@
=end original
-Usually when a variable is localized you want to make sure that this
-change affects the shortest scope possible.
+通常、変数をローカル化するとき、この変更ができるだけ最短のスコープに
+影響を与えることを確実にしたいでしょう。
従って、既に小さい C<{}> ブロックの内側であるのでない限り、それを
自身で作るべきです。
例えば:
-(TBT)
my $content = '';
open my $fh, "foo" or die $!;
@@ -706,9 +705,8 @@
これは主として最近マッチしたテキストを調べるために C<(?{...})> ブロックの
中で使われます。
-For example, to effectively capture text to a variable
-(in addition to C<$1>, C<$2>, etc.), replace C<(...)> with
-(TBT)
+例えば、(C<$1>, C<$2> などに加えて) テキストを変数に効率的に捕捉するには、
+C<(...)> を以下で置き換えます:
(?:(...)(?{ $var = $^N }))
@@ -719,9 +717,8 @@
=end original
-By setting and then using C<$var> in this way relieves you from having to
-worry about exactly which numbered set of parentheses they are.
-(TBT)
+C<$var> をこの方法で設定してから使うことで、かっこの組の番号について
+気にしなくてすむようになります。
=begin original
@@ -796,9 +793,8 @@
=end original
-The keys of the C<%+> hash list only the names of buffers that have
-captured (and that are thus associated to defined values).
-(TBT)
+C<%+> ハッシュのキーは捕捉された(従って定義された値と結びついている)
+バッファの名前のみの一覧です。
=begin original
@@ -856,12 +852,11 @@
=end original
Perl の各ファイルハンドルは、そこから読み込んだ行数を数えています。
-(Depending on the value of C<$/>, Perl's idea of what
-constitutes a line may not match yours.) When a line is read from a
-filehandle (via readline() or C<< <> >>), or when tell() or seek() is
-called on it, C<$.> becomes an alias to the line counter for that
-filehandle.
-(TBT)
+(C<$/> の値に依存して、何が行を構成するかに関する Perl の考えはあなたの
+考えと一致しないかもしれません。)
+行が(readline() や C<< <> >> を使って)ファイルハンドルから読み込まれたか、
+tell() や seek() がファイルハンドルに対して呼び出された場合、
+C<$.> はそのファイルハンドルの行カウンタへのエイリアスとなります。
=begin original
@@ -872,11 +867,12 @@
=end original
-You can adjust the counter by assigning to C<$.>, but this will not
-actually move the seek pointer. I<Localizing C<$.> will not localize
-the filehandle's line count>. Instead, it will localize perl's notion
-of which filehandle C<$.> is currently aliased to.
-(TBT)
+C<$.> へ代入することでカウンタの値を修正できますが、これは実際にシーク
+ポインタを動かすことはありません。
+I<C<$.> をローカル化してもファイルハンドルの行カウンタは
+ローカル化されません>。
+代わりに、現在 C<$.> がどのファイルハンドルへのエイリアスかという情報が
+ローカル化されます。
=begin original
@@ -892,10 +888,9 @@
オープンしているファイルハンドルが close() されることなく再オープンされた
場合にはリセット B<されません>。
さらなる詳細については、L<perlop/"IE<sol>O Operators"> を参照してください。
-Because C<< <> >> never does
-an explicit close, line numbers increase across ARGV files (but see
-examples in L<perlfunc/eof>).
-(TBT)
+なぜなら、 C<< <> >> は決して明示的なクローズは行わず、行番号は ARGV の
+ファイル間で通算してカウントされるからです(但し L<perlfunc/eof> の例を
+参照してください)。
=begin original
@@ -905,10 +900,8 @@
=end original
-You can also use C<< HANDLE->input_line_number(EXPR) >> to access the
-line counter for a given filehandle without having to worry about
-which handle you last accessed.
-(TBT)
+また、C<< HANDLE->input_line_number(EXPR) >> とすることで、どのハンドルに
+最後にアクセスしたかを気にすることなく行カウンタにアクセスできます。
=begin original
@@ -1433,9 +1426,7 @@
=end original
-The keys of the C<%-> hash correspond to all buffer names found in
-the regular expression.
-(TBT)
+C<%-> ハッシュのキーは正規表現で見つかった全てのバッファ名に対応します。
=begin original
@@ -1663,12 +1654,12 @@
=end original
-The native status returned by the last pipe close, backtick (C<``>)
-command, successful call to wait() or waitpid(), or from the system()
-operator. On POSIX-like systems this value can be decoded with the
-WIFEXITED, WEXITSTATUS, WIFSIGNALED, WTERMSIG, WIFSTOPPED, WSTOPSIG
-and WIFCONTINUED functions provided by the L<POSIX> module.
-(TBT)
+The native status returned by
+最後のパイプクローズ、逆クォート (C<``>) コマンド、wait() と waitpid() の
+成功した呼び出し、system() 演算子から返された、ネイティブなステータスです。
+POSIX 風システムでは、この値は L<POSIX> モジュールで提供される
+WIFEXITED, WEXITSTATUS, WIFSIGNALED, WTERMSIG, WIFSTOPPED, WSTOPSIG,
+WIFCONTINUED 関数でデコードできます。
=begin original
@@ -1950,12 +1941,12 @@
=end original
-Note for Linux users: on Linux, the C functions C<getpid()> and
-C<getppid()> return different values from different threads. In order to
-be portable, this behavior is not reflected by C<$$>, whose value remains
-consistent across threads. If you want to call the underlying C<getpid()>,
-you may use the CPAN module C<Linux::Pid>.
-(TBT)
+Linux ユーザーへの注意: Linux では、C 関数 C<getpid()> と C<getppid()> は
+スレッドが異なると異なった値を返します。
+移植性のために、この振る舞いは C<$$> には反映されず、この値はスレッド間で
+一貫しています。
+もし内在する C<getpid()> を呼び出したい場合は、CPAN モジュール
+C<Linux::Pid> が使えます。
=item $REAL_USER_ID
@@ -1976,10 +1967,10 @@
本プロセスの実 uid を示します。
(記憶法: setuid で実行中であれば、そこ「から」来た uid です。)
-You can change both the real uid and
-the effective uid at the same time by using POSIX::setuid(). Since
-changes to $< require a system call, check $! after a change attempt to
-detect any possible errors.
+You can change both the real uid and the effective uid at the same
+time by using POSIX::setuid().
+Since changes to $< require a system call, check $!
+after a change attempt to detect any possible errors.
(TBT)
=item $EFFECTIVE_USER_ID
@@ -2010,8 +2001,9 @@
=end original
You can change both the effective uid and the real uid at the same
-time by using POSIX::setuid(). Changes to $> require a check to $!
-to detect any possible errors after an attempted change.
+time by using POSIX::setuid().
+Changes to $> require a check to $! to detect any possible errors
+after an attempted change.
(TBT)
=begin original
@@ -2260,9 +2252,9 @@
In multithreaded scripts Perl coordinates the threads so that any
thread may modify its copy of the C<$0> and the change becomes visible
-to ps(1) (assuming the operating system plays along). Note that
-the view of C<$0> the other threads have will not change since they
-have their own copies of it.
+to ps(1) (assuming the operating system plays along).
+他のスレッドが持っている C<$0> の見え方は(各自が自身のコピーを
+持っているので)変わらないことに注意してください。
(TBT)
=item $[
@@ -2423,13 +2415,15 @@
=end original
-Controls how certain regex optimisations are applied and how much memory they
-utilize. This value by default is 65536 which corresponds to a 512kB temporary
-cache. Set this to a higher value to trade memory for speed when matching
-large alternations. Set it to a lower value if you want the optimisations to
-be as conservative of memory as possible but still occur, and set it to a
-negative value to prevent the optimisation and conserve the most memory.
-Under normal situations this variable should be of no interest to you.
+どれくらい正規表現の最適化を行い、どれくらいのメモリを利用するかを
+制御します。
+デフォルトではこの値は 65536 で、512kB の一時キャッシュに相当します。
+この値を大きくすると、大きなものとマッチングするときに速度を重視して
+多くのメモリを使います。
+Set it to a lower value if you want the optimisations to
+be as conservative of memory as possible but still occur,
+負の値を設定すると最適化は行わず、最大のメモリを使用します。
+通常の状況では、この変数はあなたの興味を引くものではないでしょう。
(TBT)
=item $SYSTEM_FD_MAX
@@ -3157,12 +3151,10 @@
=end original
-It is not safe to use the value of $^X as a path name of a file,
-as some operating systems that have a mandatory suffix on
-executable files do not require use of the suffix when invoking
-a command.
+$^X の値をファイルのパス名として使うのは安全ではありません;
+実行ファイルに固定の接尾辞があり、コマンドの起動時には接尾辞が不要な OS も
+あるからです。
$^X の値をパス名に変換するには、以下のコードを使ってください:
-(TBT)
# Build up a set of file names (not command names).
use Config;
@@ -3183,14 +3175,12 @@
=end original
-Because many operating systems permit anyone with read access to
-the Perl program file to make a copy of it, patch the copy, and
-then execute the copy, the security-conscious Perl programmer
-should take care to invoke the installed copy of perl, not the
-copy referenced by $^X.
+多くの OS が Perl のプログラムファイルのコピーを作って、コピーに
+パッチを当て、それを実行するための読み込み権限を全員に与えているので、
+セキュリティ意識のある Perl プログラマは $^X で参照されているコピーではなく、
+インストールされている perl を起動するように気をつけるべきです。
以下のコードはこの目的を達成し、コマンドとして起動したりファイルとして
参照するためのパス名を作成します。
-(TBT)
use Config;
$secure_perl_path = $Config{perlpath};
@@ -3214,15 +3204,15 @@
=end original
-The special filehandle that iterates over command-line filenames in
-C<@ARGV>. Usually written as the null filehandle in the angle operator
-C<< <> >>. Note that currently C<ARGV> only has its magical effect
-within the C<< <> >> operator; elsewhere it is just a plain filehandle
-corresponding to the last file opened by C<< <> >>. In particular,
-passing C<\*ARGV> as a parameter to a function that expects a filehandle
-may not cause your function to automatically read the contents of all the
-files in C<@ARGV>.
-(TBT)
+C<@ARGV> にあるコマンドラインで指定されたファイル名に対して反復する
+特殊ファイルハンドルです。
+通常角かっこ C<< <> >> の中で空ファイルハンドルとして書かれます。
+現在のところ、C<ARGV> は C<< <> >> 演算子の中でのみ特別な効果があることに
+注意してください; その他の場所では、C<< <> >> で開かれた最後のファイルに
+対応する普通のファイルハンドルです。
+特に、ファイルハンドルを想定している関数に C<\*ARGV> を引数として渡しても、
+関数内で C<@ARGV> にある全てのファイルの内容を自動的に読み込むことには
+なりません。
=item $ARGV
X<$ARGV>
@@ -3327,10 +3317,11 @@
=end original
-You can also insert hooks into the file inclusion system by putting Perl
-code directly into @INC. Those hooks may be subroutine references, array
-references or blessed objects. See L<perlfunc/require> for details.
-(TBT)
+Perl のコードを直接 @INC に入れることで、ファイルインクルード機構に
+フックを挿入できます。
+このフックはサブルーチンリファレンス、配列リファレンス、bless された
+オブジェクトが可能です。
+詳細については L<perlfunc/require> を参照してください。
=item @ARG
@@ -3378,12 +3369,11 @@
=end original
-If the file was loaded via a hook (e.g. a subroutine reference, see
-L<perlfunc/require> for a description of these hooks), this hook is
-by default inserted into %INC in place of a filename. Note, however,
-that the hook may have set the %INC entry by itself to provide some more
-specific info.
-(TBT)
+ファイルがフック(つまりサブルーチンリファレンス; フックに関する
+説明については L<perlfunc/require> を参照してください)経由で読み込まれた
+場合、このフックはデフォルトではファイル名の代わりに %INC に挿入されます。
+しかし、フックはさらなる特定の情報を提供するために、自身で %INC エントリを
+セットするかもしれないことに注意してください。
=item %ENV