argra****@users*****
argra****@users*****
2008年 10月 16日 (木) 04:22:24 JST
Index: docs/perl/5.10.0/perldiag.pod
diff -u docs/perl/5.10.0/perldiag.pod:1.5 docs/perl/5.10.0/perldiag.pod:1.6
--- docs/perl/5.10.0/perldiag.pod:1.5 Wed Jul 9 03:40:20 2008
+++ docs/perl/5.10.0/perldiag.pod Thu Oct 16 04:22:24 2008
@@ -887,9 +887,8 @@
=end original
-(P) An internal request asked to add a dirhandle entry to something
-that wasn't a symbol table entry.
-(TBT)
+(P) シンボルテーブルエントリではないものに、ディレクトリハンドルエントリを
+登録するような内部要求があがりました。
=item Bad symbol for filehandle
@@ -1181,11 +1180,11 @@
=end original
-(F) You manipulated Perl's symbol table directly, stored a reference in it,
-then tried to access that symbol via conventional Perl syntax. The access
-triggers Perl to autovivify that typeglob, but it there is no legal conversion
-from that type of reference to a typeglob.
-(TBT)
+(F) あなたは Perl のシンボルテーブルを直接操作して、リファレンスをその中に
+補完し、それからそのシンボルを伝統的な Perl の文法のよって
+アクセスしようとしました。
+このアクセスによって、Perl はこの型グロブを自動有効化しますが、
+リファレンス型から型グロブへの正当な変換方法はありません。
=item Cannot copy to %s in %s
@@ -1622,10 +1621,9 @@
(F) プラットフォームのバイト順序がビッグエンディアンでも
リトルエンディアンでもないか、ポインタサイズがとても変わっています。
-Packing and unpacking big- or
-little-endian floating point values and pointers may not be possible.
+ビッグエンディアンやリトルエンディアンの不動小数点数やポインタの
+pack や unpack はできません。
L<perlfunc/pack> を参照してください。
-(TBT)
=item Can't exec "%s": %s
@@ -2149,8 +2147,9 @@
(W syntax) You did not define (or require/use) the first package,
which is named as a (possibly indirect) parent of the second by
-C<@ISA> inheritance. Perl will treat this as if the undefined
-package had an empty C<@ISA>.
+C<@ISA> inheritance.
+Perl はこれを、未定義のパッケージが空の C<@ISA> を持っているものとして
+扱います。
(TBT)
=item Can't locate PerlIO%s
@@ -2701,10 +2700,9 @@
=end original
-(F) A type cannot be forced to have both big-endian and little-endian
-byte-order at the same time, so this combination of modifiers is not
-allowed. See L<perlfunc/pack>.
-(TBT)
+(F) 一つの型を同時にビッグエンディアンとリトルエンディアンの両方に
+強制することはできないので、この修飾子の組み合わせは許可されません。
+L<perlfunc/pack> を参照してください。
=item Can't use %s for loop variable
@@ -2746,11 +2744,10 @@
=end original
-(F) You attempted to force a different byte-order on a type
-that is already inside a group with a byte-order modifier.
-For example you cannot force little-endianness on a type that
-is inside a big-endian group.
-(TBT)
+(F) 既にバイト順修飾子が付けられているグループの内側で異なったバイト順を
+強制しようとしました。
+例えば、ビッグエンディアングループの中にある型をリトルエンディアンに
+強制することはできません。
=item Can't use "my %s" in sort comparison
@@ -2983,7 +2980,7 @@
=end original
-(W unpack) 以下のようなことを:
+(W unpack) 以下のようなことをしましたが:
unpack("H", "\x{2a1}")
@@ -2995,10 +2992,10 @@
=end original
-where the format expects to process a byte (a character with a
-value below 256), but a higher value was provided instead. Perl
-uses the value modulus 256 instead, as if you had provided:
-(TBT)
+ここでフォーマットはバイト(値が 256 より小さい文字)を想定していますが、
+文字の中により大きな値のものがあります。
+Perl は、あなたが以下のようにしたかのように、256 で割った余りを文字の
+値として使います:
unpack("H", "\x{a1}")
@@ -3010,7 +3007,7 @@
=end original
-(W pack) 以下のようなことを:
+(W pack) 以下のようなことをしましたが:
pack("u", "\x{1f3}b")
@@ -3022,10 +3019,10 @@
=end original
-where the format expects to process a sequence of bytes (character with a
-value below 256), but some of the characters had a higher value. Perl
-uses the character values modulus 256 instead, as if you had provided:
-(TBT)
+ここでフォーマットはバイト(値が 256 より小さい文字)列を想定していますが、
+文字の中により大きな値のものがあります。
+Perl は、あなたが以下のようにしたかのように、256 で割った余りを文字の
+値として使います:
pack("u", "\x{f3}b")
@@ -3037,7 +3034,7 @@
=end original
-(W unpack) 以下のようなことを:
+(W unpack) 以下のようなことをしましたが:
unpack("s", "\x{1f3}b")
@@ -3049,10 +3046,10 @@
=end original
-where the format expects to process a sequence of bytes (character with a
-value below 256), but some of the characters had a higher value. Perl
-uses the character values modulus 256 instead, as if you had provided:
-(TBT)
+ここでフォーマットはバイト(値が 256 より小さい文字)列を想定していますが、
+文字の中により大きな値のものがあります。
+Perl は、あなたが以下のようにしたかのように、256 で割った余りを文字の
+値として使います:
unpack("s", "\x{f3}b")
@@ -3076,7 +3073,7 @@
=end original
(W io) 閉じようとしたディレクトリハンドルは既に閉じられているか、実際には
-ディレクトリハンドルではありませんでした。
+ディレクトリハンドルではありません。
制御フローをチェックしてください。
=item Code missing after '/'
@@ -3241,11 +3238,10 @@
=end original
-(F) The parser found inconsistencies while attempting to find
-the character name specified in the C<\N{...}> escape. Perhaps you
-forgot to load the corresponding C<charnames> pragma?
-See L<charnames>.
-(TBT)
+(F) パーサが、C<\N{...}> エスケープで指定された文字名の検索中に矛盾を
+発見しました。
+おそらく対応する C<charnames> プラグマの読み込みを忘れたのでは?
+L<charnames> を参照してください。
=item Constant is not %s reference
@@ -4050,8 +4046,7 @@
=end original
-(F) A tied array claimed to have a negative number of elements, which
-is not possible.
+(F) tie された配列に対して負の番号の要素を要求されました; これは不可能です。
(TBT)
=item Field too wide in 'u' format in pack
@@ -5560,9 +5555,8 @@
=end original
-(F) You tried to pack something that didn't comply with UTF-8 encoding
-rules and perl was unable to guess how to make more progress.
-(TBT)
+(F) UTF-8 エンコーディング規則に従わない何かを pack しようとしたので、
+perl はどうやってさらに進捗させればいいかが推測できませんでした。
=item Malformed UTF-8 string in unpack
@@ -5573,9 +5567,8 @@
=end original
-(F) You tried to unpack something that didn't comply with UTF-8 encoding
-rules and perl was unable to guess how to make more progress.
-(TBT)
+(F) UTF-8 エンコーディング規則に従わない何かを unpack しようとしたので、
+perl はどうやってさらに進捗させればいいかが推測できませんでした。
=item Malformed UTF-8 string in '%c' format in unpack
@@ -5586,9 +5579,8 @@
=end original
-(F) You tried to unpack something that didn't comply with UTF-8 encoding
-rules and perl was unable to guess how to make more progress.
-(TBT)
+(F) UTF-8 エンコーディング規則に従わない何かを unpack しようとしたので、
+perl はどうやってさらに進捗させればいいかが推測できませんでした。
=item Maximal count of pending signals (%s) exceeded
@@ -8279,7 +8271,7 @@
=end original
-(W closed) 書き込みを行なおうとしたファイルハンドルは、既にクローズされています。
+(W closed) 書き込みを行なおうとしたファイルハンドルは、既に閉じられています。
制御フローをチェックしてください。
=item print() on closed filehandle %s
@@ -8291,7 +8283,7 @@
=end original
-(W closed) print を行なおうとしたファイルハンドルは、既にクローズされています。
+(W closed) print を行なおうとしたファイルハンドルは、既に閉じられています。
制御フローをチェックしてください。
=item Process terminated by SIG%s
@@ -8417,9 +8409,9 @@
=end original
-(W io) The dirhandle you're reading from is either closed or not really
-a dirhandle. Check your control flow.
-(TBT)
+(W io) 読み込もうとしたディレクトリハンドルは既に閉じられているか、
+実際にはディレクトリハンドルではありません。
+制御フローをチェックしてください。
=item readline() on closed filehandle %s
@@ -8430,7 +8422,7 @@
=end original
-(W closed) 読み込みを行なおうとしたファイルハンドルは、既にクローズされています。
+(W closed) 読み込もうとしたファイルハンドルは、既に閉じられています。
制御フローをチェックしてください。
=item read() on closed filehandle %s
@@ -8500,10 +8492,9 @@
=end original
-(F) While calculating the method resolution order (MRO) of a package, Perl
-believes it found an infinite loop in the C<@ISA> hierarchy. This is a
-crude check that bails out after 100 levels of C<@ISA> depth.
-(TBT)
+(F) パッケージのメソッド解決順序 (MRO) の計算中に、C<@ISA> 構造に
+無限ループがあると判断しました。
+これは、C<@ISA> を 100 階層探索した後に起きる荒いチェックです。
=item Recursive inheritance detected while looking for method %s
@@ -8742,9 +8733,9 @@
=end original
-(W io) The dirhandle you tried to do a rewinddir() on is either closed or not
-really a dirhandle. Check your control flow.
-(TBT)
+(W io) rewinddir() しようとしたディレクトリハンドルは既に閉じられているか、
+実際にはディレクトリハンドルではありません。
+制御フローをチェックしてください。
=item Runaway format
@@ -9818,9 +9809,9 @@
=end original
-(W io) The dirhandle you tried to telldir() is either closed or not really
-a dirhandle. Check your control flow.
-(TBT)
+(W io) telldir() しようとしたディレクトリハンドルは既に閉じられているか、
+実際にはディレクトリハンドルではありません。
+制御フローをチェックしてください。
=item That use of $[ is unsupported
@@ -10663,9 +10654,7 @@
(W regexp) Perl 内部文字クラスで認識できない、バックスラッシュ-文字の
組み合わせを使いました。
文字はリテラルに理解されます。
-The <-- HERE shows in the regular expression about where the
-escape was discovered.
-(TBT)
+<-- HERE で正規表現のどこにエスケープが発見されたかを示しています。
=item Unrecognized escape \\%c passed through
Index: docs/perl/5.10.0/perltoot.pod
diff -u docs/perl/5.10.0/perltoot.pod:1.4 docs/perl/5.10.0/perltoot.pod:1.5
--- docs/perl/5.10.0/perltoot.pod:1.4 Mon Aug 25 03:46:35 2008
+++ docs/perl/5.10.0/perltoot.pod Thu Oct 16 04:22:24 2008
@@ -2405,10 +2405,9 @@
パッケージ名を入れることもできます。
これらのパッケージも UNIVERSAL 自身と同様、全てのクラスによって
暗黙的に継承されます。
-However, neither UNIVERSAL nor any of its parents from the @ISA tree
-are explicit base classes of all objects.
+しかし、UNIVERSAL も @ISA 木によるその親も、全てのオブジェクトの明示的な
+基底クラスにはなりません。
明確化するために、以下のコードを見てみます:
-(TBT)
@UNIVERSAL::ISA = ('REALLYUNIVERSAL');
Index: docs/perl/5.10.0/perlvar.pod
diff -u docs/perl/5.10.0/perlvar.pod:1.4 docs/perl/5.10.0/perlvar.pod:1.5
--- docs/perl/5.10.0/perlvar.pod:1.4 Mon Jul 21 05:42:15 2008
+++ docs/perl/5.10.0/perlvar.pod Thu Oct 16 04:22:24 2008
@@ -148,13 +148,12 @@
=end original
-You should be very careful when modifying the default values of most
-special variables described in this document. In most cases you want
-to localize these variables before changing them, since if you don't,
-the change may affect other modules which rely on the default values
-of the special variables that you have changed. This is one of the
-correct ways to read the whole file at once:
-(TBT)
+この文書に記述されているほとんどの特殊変数のデフォルト値を変更するときには
+とても慎重になるべきです。
+ほとんどの場合、これらの変数を変更する前にこれらをローカル化したいでしょう;
+さもなければ、あなたが変更した特殊変数のデフォルト値に依存している
+その他のモジュールにも影響を与えるかもしれないからです。
+これはファイル全体を一度に読み込む正しい方法の一つです:
open my $fh, "foo" or die $!;
local $/; # enable localized slurp mode