IWAI Masaharu
iwai****@users*****
2007年 2月 7日 (水) 14:14:47 JST
Index: docs/modules/File-Log-1.02/Log.pod
diff -u docs/modules/File-Log-1.02/Log.pod:1.2 docs/modules/File-Log-1.02/Log.pod:1.3
--- docs/modules/File-Log-1.02/Log.pod:1.2 Wed Jan 31 14:23:29 2007
+++ docs/modules/File-Log-1.02/Log.pod Wed Feb 7 14:14:47 2007
@@ -30,10 +30,10 @@
my $log = Log->new(debug => $debugLevel, logFileName => $logFileName,);
# debug >= 2 の時にメッセージをログファイルに出力
- $log->msg(2, "Add this to the log file if debug >= 2 (J\(Bn");
+ $log->msg(2, "Add this to the log file if debug >= 2 \n");
# 例外(error)メッセージをログファイルに出力
- $log->exp("Something went wrong(J\(Bn");
+ $log->exp("Something went wrong\n");
# ログファイルをクローズ(終了時のオプション)
$log->close();
@@ -145,7 +145,7 @@
2番目とその後に続くオプショナルな引数は、ログファイルに出力されるテキストとして
扱われる。
-例. $log->msg(2, "もしも 'debug' が2以上ならば、ログファイルに出力(J\(Bn");
+例. $log->msg(2, "もしも 'debug' が2以上ならば、ログファイルに出力\n");
改行文字は、メソッドによって自動的にB<付加されない>ことにB<注意>。
@@ -254,15 +254,11 @@
=head1 CVS ID
-$Id: Log.pod,v 1.1 2006/04/25 04:26:36 ribbon Exp $
+$Id: Log.pm,v 1.2 2004/10/08 23:10:14 Greg Exp $
=head1 変更履歴
- $Log: Log.pod,v $
- Revision 1.1 2006/04/25 04:26:36 ribbon
-
- add First version.
-
+ $Log: Log.pm,v $
Revision 1.2 2004/10/08 23:10:14 Greg
- Changed new() to allow named argument as well as the anonymous hash reference.