argra****@users*****
argra****@users*****
2011年 9月 29日 (木) 04:43:33 JST
Index: docs/perl/5.10.1/perllexwarn.pod
diff -u docs/perl/5.10.1/perllexwarn.pod:1.1 docs/perl/5.10.1/perllexwarn.pod:1.2
--- docs/perl/5.10.1/perllexwarn.pod:1.1 Wed Sep 28 05:45:46 2011
+++ docs/perl/5.10.1/perllexwarn.pod Thu Sep 29 04:43:32 2011
@@ -10,7 +10,7 @@
=end original
-perllexwarn - Perl レキシカル警告
+perllexwarn - Perl のレキシカルな警告
=head1 DESCRIPTION
@@ -39,13 +39,12 @@
=end original
-This pragma works just like the C<strict> pragma.
-This means that the scope of the warning pragma is limited to the
-enclosing block. It also means that the pragma setting will not
-leak across files (via C<use>, C<require> or C<do>). This allows
-authors to independently define the degree of warning checks that will
-be applied to their module.
-(TBT)
+このプラグマはちょうど C<strict> プラグマと同様に動作します。
+つまり、警告プラグマのスコープは閉じたブロック内に限定されます。
+また、プラグマ設定は (C<use>, C<require>, C<do> を通して)ファイルを超えて
+漏洩することはありません。
+これにより、モジュール作者は警告チェックの度合いを独立に
+設定できるようになります。
=begin original
@@ -121,9 +120,8 @@
=end original
-Before the introduction of lexical warnings, Perl had two classes of
-warnings: mandatory and optional.
-(TBT)
+レキシカル警告の説明の前に、Perl は二つの警告クラスがあります:
+強制的(mandatory)とオプション(optional)です。
=begin original
@@ -134,11 +132,10 @@
=end original
-As its name suggests, if your code tripped a mandatory warning, you
-would get a warning whether you wanted it or not.
-For example, the code below would always produce an C<"isn't numeric">
-warning about the "2:".
-(TBT)
+名前が示しているように、コードが強制的な警告に引っかかると、望むと
+望まな意図にかかわらず警告を出力します。
+例えば、以下のコードは "2:" の部分に対して常に C<"isn't numeric"> 警告を
+出力します。
my $a = "2:" + 3;
@@ -153,13 +150,12 @@
=end original
-With the introduction of lexical warnings, mandatory warnings now become
-I<default> warnings. The difference is that although the previously
-mandatory warnings are still enabled by default, they can then be
-subsequently enabled or disabled with the lexical warning pragma. For
-example, in the code below, an C<"isn't numeric"> warning will only
-be reported for the C<$a> variable.
-(TBT)
+レキシカルな警告の導入によって、強制的な警告は I<デフォルトの> 警告と
+なりました。
+違いは、以前の強制的な警告は今でもデフォルトで有効ですが、引き続く
+レキシカルな警告プラグマで有効/無効にに出来ることです。
+例えば、以下のコードでは、C<"isn't numeric"> 警告は C<$a> 変数に対してだけ
+報告されます。
my $a = "2:" + 3;
no warnings;
@@ -172,9 +168,9 @@
=end original
-Note that neither the B<-w> flag or the C<$^W> can be used to
-disable/enable default warnings. They are still mandatory in this case.
-(TBT)
+B<-w> オプションや C<$^W> はデフォルトの警告を無効/有効にするのには
+使えないことに注意してください。
+この場合は強制的なままです。
=head2 What's wrong with B<-w> and C<$^W>
@@ -290,9 +286,8 @@
=end original
-Lexical warnings get around these limitations by allowing finer control
-over where warnings can or can't be tripped.
-(TBT)
+レキシカルな警告は、どこで警告に引っかかるか引っかからないかに関して
+より精度の高い制御をすることで、これらの制限を回避します。
=head2 Controlling Warnings from the Command Line
@@ -905,8 +900,7 @@
=end original
-Consider this example:
-(TBT)
+この例を考えます:
package Original;