Update 2024-02-14 07:51 OpenBSD/amd64-x13

.bin/OLD/listincludes.pl

@@ -0,0 +1,21 @@
+#!/usr/bin/env perl
+
+use strict;
+use warnings;
+
+use File::Find;
+
+use Data::Dumper;
+
+
+find( { wanted => \&findfiles, },'.' );
+
+sub findfiles {
+    if(-f "$File::Find::name") {
+        if("$File::Find::name" =~ /.*.\[c\|cc\|cpp\|h\|hh\|hpp\]/) {
+        print "$File::Find::name\n"; 
+        }
+    }
+
+}
+exit;