Try this:
Those quotes around 'find' are backquotes.#!/usr/bin/perl use strict; use Data::Dumper; my $INI_DIR='/shares/MILKLINK/PPdir'; my $REG; print "Enter Reg Number: "; chomp ($REG = <>); my @FILE = `find $INI_DIR -name *.dpt | xargs grep -l $REG`; print Dumper(\@FILE) . "\n";
It is unclear to me what you want to do with the grepped lines.
In reply to Re^3: Grep file out of directory and read into array
by pme
in thread Grep file out of directory and read into array
by Jalcock501
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |