Re: How can I run an folder full of text files through a perl script?

[zentara]

Here is a simple File::Find script that might help.

#!/usr/bin/perl
use File::Find;

$|++;

my $path = '.';

my $cmd = 'file'; # a test command

finddepth (\&wanted,$path);

sub wanted {
  return unless (-f and -T); # only process text files
  
  system($cmd ,$_) or warn "$!\n";
  # or put your processing code here instead of system

 }

__END__