Select Code to Download

use warnings;                                                         
+           
                                                                      
+           
...
                                                                      
+           
[config]                                                              
+           
bingo=42

Use of uninitialized value $v in concatenation (.) or string at mytest
+.pl line 12, <DATA> line 1.
The [main] key has  value
...
The [config] key has  value

The bingo key has 42 value

my $c;
while ($c++ < 10) {
    print "$c\n";
}