Heehee...... I don't know if this script will work or not, I just *think* it
will work =)
|| if you just want to find a text editor which cap. to edit and search
around multiple
pgs. I recommand the cuteHTML, which come with CuteFTP if you are using
windows.


####################################################################
@sortOfFileNames = ("someScrip1.pl", "someScrip2.pl", ......);
@sortOfVar2Check = ('$someVar1', '$someVar2', .....);
$lineNum = 0;

open (SAVEREC, ">result.txt");
foreach $currentFile(@sortOfFileName)
{
    open (SCRIPTFILE, "<$currentFile");
        while(<FILE>)
        {
            $lineConent = $_;
            foreach $var(@sortOfVar2Check)
            {
                if ($lineContent =~ /$var/) { print SAVEREC "$var EXIST AT
$lineNum in $currentFile. \n" }
                $lineNum++;
            }
        }
    close(SCRIPTFILE);
    $lineNum = 0;
}
close (SAVEREC);

----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, January 04, 2002 5:22 AM
Subject: Anyone have a cross-reference program?


>
> I'm new to PERL and I've been given a program to analyze - and it's BIG. I
> need to change and add some variables. What might help me greatly is if I
> could obtain a crossreference program that would tell me where all the
> variables are defined and used. I could use a search in wordpad or etc.
but
> a crossreference would be ideal. Does anyone know where I might find one -
> or at the least a program to list/sort variables by line number? Thank
you!!
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to