On Friday, May 3, 2002, at 02:57 , Jerry Preston wrote:
> I tried the following:
>
> if( ! defined( $x = readlink( "$fp/$program" ))) {
> print "2 programs $program*'$x'*\n";
> $programs{ program }{ $program } = "$fp/$program";
> }
>
> and all I get is '';
let's try
ssions are lwxrwxrwxr and the other is -wxrwxrwxr!
Any ideas?
Thanks,
Jerry
-Original Message-
From: Jerry Preston [mailto:[EMAIL PROTECTED]]
Sent: Friday, May 03, 2002 1:09 PM
To: Beginners Perl
Subject: file types
Hi!
I am trying to determine if a is linked or not. I am using the f
On Friday, May 3, 2002, at 01:30 , drieux wrote:
>
> On Friday, May 3, 2002, at 11:08 , Jerry Preston wrote:
>
>> Hi
hello
for those playing the 'play along at home game'
http://www.wetware.com/drieux/CS/lang/Perl/Beginners/linkToNowhere.txt
where I go into a bit more detail about the diffe
On Friday, May 3, 2002, at 11:08 , Jerry Preston wrote:
> Hi!
>
> I am trying to determine if a is linked or not. I am using the following:
[..]
> I get the same result for two files! One is linked and the other is not.
let me offer you a bit of a basic case:
vladimir: 57:] ls -l *dos*
-rwxr
Jerry Preston wrote:
>
> Hi!
Hello,
> I am trying to determine if a is linked or not. I am using the following:
If you have a file and you want to determine if another file is linked
to it then you will have to search through all files on your system to
find it/them. If you find a symbolic l
Hi!
I am trying to determine if a is linked or not. I am using the following:
if( -f "$fp/$program" ) {
print "2 programs $program*\n";
$programs{ program }{ $program } = "$fp/$program";
}
and
if( -l "$fp/$program" ) {
print "2 programs $program*\n";
