Hi, You'll have to make some changes in your script. Those have been highlighted in blue and red color below. It'll run now. Cheers Sonika
On Wed, Aug 6, 2008 at 7:59 AM, Sudeep Sharma <[EMAIL PROTECTED]> wrote: > Hello All, > > I have copied this script from this url which solves one of my purpose of > parsing a config file. Here is the URL > http://www.motreja.com/ankur/examplesinperl/parsing_config_files.htm > > Now when I am running the script I am getting these errors: > Use of uninitialized value in pattern match (m//) at config_parser.pl line > 26. > Use of uninitialized value in split at config_parser.pl line 27. > Use of uninitialized value in hash element at config_parser.pl line 28. > > Here is the copy of script, may be there is something which I am not doing > properly. Could someone please help me running this script successfully. > > =================================script begins============================ > #! perl -w > > $path_and_filename="data.txt"; %Config=(); #global variable > > > # Call the subroutine > &parse_config_file ($path_and_filename, \%Config); > > foreach $Config_key (keys %Config) { > > print "$Config_key = $Config{$Config_key}\n"; > > } > sub parse_config_file { > > local ($config_line, $Name, $Value, $Config); > > ($File, $Config) = @_; > > if (!open (CONFIG, "$File")) { > print "ERROR: Config file not found : $File"; > exit(0); > } > #while () { while ($config_line=<CONFIG>) { > > # $config_line=$_; > chop ($config_line); # Get rid of the trailling \n > if ($config_line !~ /^#/) { # Ignore lines starting with # and > blank lines > ($Name, $Value) = split (/=/, $config_line); # Split > each line into name value pairs > $$Config{$Name} = $Value; > $Name=$Value=""; #reinitialize the variables > # Create a hash of the name value pairs > } > } > > close(CONFIG); > } > =================================script ends============================== > > > > > _______________________________________________ > ilugd mailinglist -- [email protected] > http://frodo.hserus.net/mailman/listinfo/ilugd > Archives at: http://news.gmane.org/gmane.user-groups.linux.delhi > http://www.mail-archive.com/[email protected]/ > _______________________________________________ ilugd mailinglist -- [email protected] http://frodo.hserus.net/mailman/listinfo/ilugd Archives at: http://news.gmane.org/gmane.user-groups.linux.delhi http://www.mail-archive.com/[email protected]/
