RE: file wildcards in Win32

[barZion]

This should print out all the filenames with a .h or .c extension on Win32 in a specified subdirectory. Naturally, you would want to tweak it to suit your needs, but it finds the extensions quite nicely.

use Win32::Process;

print "Enter the subdirectory you'd like to parse: ";
$path = <STDIN>;
chomp( $path );
$prefix = "C:\\Projects\\Source\\";
$path = "$prefix$path";
$path = "." unless $path;

opendir( DIR, $path )
    or die "Can't open $path: $!";
while ( $entry = readdir( DIR ) ) {
    $type = ( -d "$path\\$entry" ) ? "dir" : "file"; # $path is crucia
+l!        
    if( $entry =~ /\.h|\.c$/ ){
        print "$entry\n";        
    }
}    
closedir( DIR );

[flyfishin]

This will print all files that end in .h* or just .c. It will list .html files .htm files, etc. Surround the \.h|\.c with parens. Change

if ( $entry =~ /\.h|\.c$) {

to

if ( $entry =~ /(\.h|\.c)$) {

It also won't catch files that end in .H or .C if for some reason those are in caps. You can adjust accordingly.