You're still missing these two fundamental lines:
use strict; use warnings;
at the beginning of your program. Get into the habit to always include them, because they will help you spotting various errors and pitfalls.

Regarding loading files, note that you had to cut-and-paste the code while you could have factored it all out into a function. Moreover, IMHO you're using constructs that I'd avoid. If you're able to install modules in your system, you could install File::Slurp and do something along these lines:

use File::Slurp qw( read_file ); my $projectA = read_file('projecta.txt'); my $projectB = read_file('projectb.txt');
If you want to roll your own, implement the read_file() sub yourself:
sub read_file { my $filename = shift; # Force whole file into one scalar unless we want # each "line" on its own local $/ unless wantarray; open my $fh, '<', $filename # USE 3-args version of open! or die "open('$filename'): $!"; # verify your open! return <$fh>; # enjoy auto-close of $fh :) }

Regarding the split into sentences, note that there are other sentence terminators (question and exclamation marks, to name a few). Last, but not least, please re-read my previous post about your algorithm.

Flavio
perl -ple'$_=reverse' <<<ti.xittelop@oivalf

Don't fool yourself.

In reply to Re^3: Comparing 2 arrays too find the total number of identical elements. by polettix
in thread Comparing 2 arrays too find the total number of identical elements. by barrymcv

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.