sub find_files{ my ($dir, $db, $table) = @_; my $file = "$dir" ."/" . "$db.$table.[0-9][0-9]"; print "$file\n"; my @files = glob $file; foreach my $found_file (@files){ print "$found_file\n"; } return @files; }
In reply to Re^3: Find a list of numbered files with same basename
by mnlight
in thread Find a list of numbered files with same basename
by mnlight
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |