Are you looking for a particular file or the word file w/in the data being
read?
If want only a file which as file as part of the name, then
print if ( $ARGV =~ /file/i );
# $ARGV holds current file being read
Uncertain if this is what you are after.
Wags ;)
-----Original Message-----
From: AMORE,JUAN (HP-Roseville,ex1) [mailto:[EMAIL PROTECTED]]
Sent: Thursday, October 04, 2001 14:13
To: Beginners@Perl. Org (E-mail)
Cc: AMORE,JUAN (HP-Roseville,ex1)
Subject: Trying to search for a file and display its contents to screen!
Hello Anyone!
The below file is giving some strange error.
I'm trying to search for a file and display its contents.
I'm using the following script below....
Do's anyone know a simple script besides the one I have written.
Best Rgds;
Juan;
Use of implicit split to @_ is deprecated at proj2_1.pl line 13.
#
#
while (<>) {
print if
(qw/file/);
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
