(1) {
$dispf = undef;
my ($ai, $bi) = ($al-$ap, $bl-$bp);
if ($ap == 0) {
$dispf = $dispatcher->{A_FINISHED} || $dispatcher->{DISCARD_B};
$bp--; # Where to put this?
} elsif ($bp == 0) {
$dispf = $dispatcher->{B_FINISHED} || $dispatcher->{DISCARD_A};
$ap
On Mon, Mar 24, 2008 at 8:33 AM, <[EMAIL PROTECTED]> wrote:
> No it is not a homework. It's a official script which I want to make it
> into production???
snip
> > Diff /tmp/dev_path_PRS.DB.01.12.000 /tmp/dep_path_D.PRS.DB.01.12.000.8
snip
Diff is not a Perl command; however, there is a diff (n
No it is not a homework. It's a official script which I want to make it
into production???
Please help.
Regards,
Irfan
-Original Message-
From: Ken Foskey [mailto:[EMAIL PROTECTED]
Sent: Thursday, March 20, 2008 1:48 PM
To: beginners@perl.org
Subject: RE: diff of two files
S
17, 2008 7:52 PM
> To: beginners@perl.org
> Subject: diff of two files
>
> Hi All,
>
>
>
> I want to compare the two files in Perl. The requirement is that file 1
> has 20 lines and file2 has 25 lines . I want to see only five lines as
> output which are there in fi
Hi All,
Can somebody please help me on this???
Regards,
Irfan
-Original Message-
From: Sayed, Irfan
Sent: Monday, March 17, 2008 7:52 PM
To: beginners@perl.org
Subject: diff of two files
Hi All,
I want to compare the two files in Perl. The requirement is that file 1
has 20 lines
[EMAIL PROTECTED] wrote:
I want to compare the two files in Perl. The requirement is that file 1
has 20 lines and file2 has 25 lines . I want to see only five lines as
output which are there in file2 not in file1 as I know that rest of the
20 lines are same in both the files.
I am using the foll
Hi All,
I want to compare the two files in Perl. The requirement is that file 1
has 20 lines and file2 has 25 lines . I want to see only five lines as
output which are there in file2 not in file1 as I know that rest of the
20 lines are same in both the files.
I am using the following commands
