print RESULT grep { ! /_vti_cnf/ } <INFO>;

# so that could be read as print to the output filehandle the result of the
input file handle filtered by grep.....

wow -  pretty concise line there....works well.

I'll need to look up $0 (perldoc perlvar:  Contains the name of the file
containing the Perl script
being executed. )

thanks again,
Rob
--


Reply via email to