2 |
## $Id$ |
## $Id$ |
3 |
## ------------------------------------------------------------------------- |
## ------------------------------------------------------------------------- |
4 |
## $Log$ |
## $Log$ |
5 |
|
## Revision 1.2 2003/03/28 03:07:41 joko |
6 |
|
## minor fix: 'run_cmd' required here |
7 |
|
## |
8 |
## Revision 1.1 2003/03/27 15:39:55 joko |
## Revision 1.1 2003/03/27 15:39:55 joko |
9 |
## initial commit, jobs -core and -api |
## initial commit, jobs -core and -api |
10 |
## |
## |
22 |
|
|
23 |
#use Data::Dumper; |
#use Data::Dumper; |
24 |
#use Data::Mungle::Transform::Deep qw( merge_to expand ); |
#use Data::Mungle::Transform::Deep qw( merge_to expand ); |
25 |
#use shortcuts qw( run_cmd ); |
use shortcuts qw( run_cmd ); |
26 |
|
|
27 |
# get logger instance |
# get logger instance |
28 |
my $logger = Log::Dispatch::Config->instance; |
my $logger = Log::Dispatch::Config->instance; |