Select Code to Download

#!/usr/bin/perl -w

...
my @sentences = split_sentences($a);

for my $i (0..$#sentences) { print "sentence #$i: <$sentences[$i]>\n";
+ }

sentence #0: <This is some text.>
sentence #1: <A period (".") usually terminates a statement.>
sentence #2: <But not if it's quoted.>
sentence #3: <Regardless of whether or not single quotes, '.', are use
+d.>