find(sub {
    push @headers, "$_\n" if -f && /\.h$/ && !$seen{$_}++;
}, ".");