if ( @{$header{$section}} = /stringa/gm ) {
    print "matched on stringa\n";
}
if ( @{$header{$section}} = /stringb/gm ) {
    print "regex on string b\n";
}
if ( @{$header{$section}} = /stringc/gm ) {
    print "C match\n";
}