Dear All,
I try command below in Unix
$ ls -l file?
-rw-r-r--1 root 125 May 27
11:11file1
-rwxr-x- 1 root 52125 May 27 19:11
file2
drwxr-xr-x 1
Other command can instance? Because after try still no work.
-Original Message-
From: John W. Krahn [mailto:[EMAIL PROTECTED]
Sent: Thursday, May 27, 2004 9:37 AM
To: [EMAIL PROTECTED]
Subject: Re: How to find same filename in subdirectory
> Hi, John thanks you comment, the coding i
Hi, John thanks you comment, the coding is work. But i'm detect have some small
problem in line 7 print "$File::Find::name\n" if $_ eq 'File1'; I test as below
sample 2 is follow you coding. From here i detect nothing return from script.
But after i amend the coding become print "$File::Find::nam
Hi, now I design another way.
First I request user enter the directory want to search first, if the
directory exist in the system, script will search the entire directory. If
the filename is same will display out, else no result will return. If
directory not exist will request user try another dir
Hi, after refer the File::Find, I write the script below:
#!/usr/bin/perl
use warnings;
use strict;
use File::Find;
find ( \&callback, "/") ;
sub callback{
print $File::Find::name, "\n";
}
but this script will list all the filename, from the disk. So, how I set the
condition, only displa