Subversion Repositories DevTools

Rev

Rev 7387 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7387 Rev 7406
Line 1... Line 1...
1 
########################################################################
 1 
########################################################################
2 
# Copyright (C) 1998-2011 Vix Technology, All rights reserved
 2 
# COPYRIGHT - VIX IP PTY LTD ("VIX"). ALL RIGHTS RESERVED.
3 
#
 3 
#
4 
# Module name   : StdLogger.pm
 4 
# Module name   : Logger.pm
5 
# Module type   :
 5 
# Module type   :
6 
# Compiler(s)   : Perl
 6 
# Compiler(s)   : Perl
7 
# Environment(s):
 7 
# Environment(s):
8 
#
 8 
#
9 
# Description   : Dummy logger
 9 
# Description   : Logger
10 
#                 Logs to a file
 10 
#                 Logs to a file
11 
#
 11 
#
12 
#......................................................................#
 12 
#......................................................................#
13 
 
 13 
 
14 
require 5.008_002;
 14 
require 5.008_002;
15 
use strict;
 15 
use strict;
16 
use warnings;
 16 
use warnings;
17 
package Logger;
 17 
package Logger;
18 
 
 18 
 
- 
 
 19 
# Set auto flush
19 
$| = 1;
 20 
$| = 1;
20 
 
 21 
 
21 
sub new ($$) {
 22 
sub new ($$) {
22 
    my ($class, $conf) = @_;
 23 
    my ($class, $conf) = @_;
23 
    return bless { conf => $conf }, $class;
 24 
    return bless { conf => $conf }, $class;