Help for this page
foreach my $line (@lines) { if ($line =~ m/\[foo\]/) { ... # everything there also } }
; ; foo file ; ... d=4 e=5 f=6