From: Jan T. <de...@us...> - 2002-07-07 14:34:45
|
Update of /cvsroot/net-script/netscript2/src/perl/NetScript/Util In directory usw-pr-cvs1:/tmp/cvs-serv4931 Modified Files: ConfigurationParser.pm Log Message: * added support for include/rinclude * various bugfixes * added mod_perl support Index: ConfigurationParser.pm =================================================================== RCS file: /cvsroot/net-script/netscript2/src/perl/NetScript/Util/ConfigurationParser.pm,v retrieving revision 1.4 retrieving revision 1.5 diff -C2 -d -r1.4 -r1.5 *** ConfigurationParser.pm 2 Jun 2002 19:31:23 -0000 1.4 --- ConfigurationParser.pm 7 Jul 2002 14:34:42 -0000 1.5 *************** *** 14,17 **** --- 14,18 ---- #*/ package NetScript::Util::ConfigurationParser; + #use Carp; #-------------------------------------------------------- *************** *** 32,36 **** ! open( CFILE, "<$configfile" ); while( <CFILE> ) { unless( /^[ ]*#/ ) { #filter comments --- 33,39 ---- ! ! open( CFILE, "<$configfile" ) || warn "Cannot find Configfile $configfile!"; ! while( <CFILE> ) { unless( /^[ ]*#/ ) { #filter comments |