Actually for configuration file handling, I use a pretty nifty pm called use Config::General.
Regards, Rick Michaud -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of John Serink Sent: Thursday, September 22, 2005 4:12 AM To: [email protected] Subject: Adding values to hashes Hi All: I'm using strict and use warnings in my script and I read in a configuration file. I think parse it and I want to load some names and phone numbers into a hash like this: my %ToSend=('party',000); for(my $i=0;$i<scalar(@config);$i++){ if($numberlist == 1){ $config[$i]=~m/=/; $ToSend{$`}=$'; # line 35 chomp($ToSend{$`}); # Line 36 } if($config[$i]=~m/SERVER=/){ $host=$'; chomp($host); } elsif ($config[$i]=~m/PASSWORD=/){ $smspassword=$'; chomp($smspassword); } elsif ($config[$i]=~m/NUMBER LIST/){ $numberlist=1; } } my @thekeys = keys(%ToSend); print(@thekeys); print("\n"); for(my $i=0;$i<scalar(@thekeys);$i++){ print("$thekeys[$i] with cell number:$ToSend{$thekeys[$i]}\n"); # line 52 } This all works except I get these warnings: Use of uninitialized value in hash element at smstest_13.pl line 35, <GEN0> line 7. Use of uninitialized value in hash element at smstest_13.pl line 36, <GEN0> line 7. Use of uninitialized value in scalar chomp at smstest_13.pl line 36, <GEN0> line 7. LimWan KamelAngparty Use of uninitialized value in concatenation (.) or string at smstest_13.pl line 52, <GEN0> line 7. Anybody know why I'm getting these warnings? The script all works and does the stuff I want it to but would like to get rid of the warnings. Cheers, John _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs _______________________________________________ Perl-Win32-Users mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
