print "What is their name?\n"; my $name = $_; #if ($name ne "") { chomp($name = <STDIN>); $dbm{$name} = ""; print "Added to the list!\n";
should read more like
print "What is their name?\n"; chomp($name = <STDIN>); chomp($number = <STDIN>); $dbm{$name} = $number; print "$name = $dbm{$name} added to the list!\n";
shouldn't it?
In reply to Re: Re: Re: Database storage confusion
by demerphq
in thread Database storage confusion
by sulfericacid
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |