#! /usr/bin/perl -w use strict; use warnings; use File::Find; my @directories = @ARGV ? @ARGV : ('.'); find(\&wanted, @directories); sub wanted { return unless /\.dll$/i; # Do something with $File::Find::name }
In reply to Re^4: Registering DLLs, lots of them
by inman
in thread Registering DLLs, lots of them
by ellem
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |