Databases
StackOverflow2013
Postsdbo
POHow do I use a Perl regExp to count sentences?
 

Note that there are some explanatory texts on larger screens.

plurals
  1. POHow do I use a Perl regExp to count sentences?
    primarykey
    data
    text
    <p>I've struggled with regExp in Perl for some reason from the start and have a quick script i wrote here to count sentences in some text being inputted that won't work. I just get the number 1 back at the end and I know in the file specified there is several so the count should be higher. I can't see the issue...</p> <pre><code>#!C:\strawberry\perl\bin\perl.exe #strict #diagnostics #warnings $count = 0; $file = "c:/programs/lorem.txt"; open(IN, "&lt;$file") || die "Sorry, the file failed to open: $!"; while($line = &lt;IN&gt;) { if($line =~ m/^[A-Z]/) { $count++; } } close(IN); print("Sentances count was: ($count)"); </code></pre> <p>The file lorem.txt is here......</p> <p>Lorem ipsum dolor sit amet, consectetuer adipiscing elit. Aenean commodo ligula eget dolor. Aenean massa. Cum sociis natoque penatibus et magnis dis parturient montes, nascetur ridiculus mus. Donec quam felis, ultricies nec, pellentesque eu, pretium quis, sem. Nulla consequat massa quis enim. Donec pede justo, fringilla vel, aliquet nec, vulputate eget, arcu. In enim justo, rhoncus ut, imperdiet a, venenatis vitae, justo. Nullam dictum felis eu pede mollis pretium. Integer tincidunt. Cras dapibus. Vivamus elementum semper nisi. Aenean vulputate eleifend tellus. Aenean leo ligula, porttitor eu, consequat vitae, eleifend ac, enim. Aliquam lorem ante, dapibus in, viverra quis, feugiat a, tellus. Phasellus viverra nulla ut metus varius laoreet. Quisque rutrum. Aenean imperdiet. Etiam ultricies nisi vel augue. Curabitur ullamcorper ultricies nisi. Nam eget dui. Etiam rhoncus. Maecenas tempus, tellus eget condimentum rhoncus, sem quam semper libero, sit amet adipiscing sem neque sed ipsum. Nam quam nunc, blandit vel, luctus pulvinar, hendrerit id, lorem. Maecenas nec odio et ante tincidunt tempus. Donec vitae sapien ut libero venenatis faucibus. Nullam quis ante. Etiam sit amet orci eget eros faucibus tincidunt. Duis leo. Sed fringilla mauris sit amet nibh. Donec sodales sagittis magna. Sed consequat, leo eget bibendum sodales, augue velit cursus nunc, </p>
    singulars
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. PTQuestion
    1. USMike Thornley
    1. USMike Thornley
    plurals
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. This table or related slice is empty.
    1. PO
      singulars
      1. PTAnswer
    2. PO
      singulars
      1. PTAnswer
    3. PO
      singulars
      1. PTAnswer
    1. VO
      singulars
      1. POHow do I use a Perl regExp to count sentences?
      1. This table or related slice is empty.
      1. VTDownMod
    2. VO
      singulars
      1. POHow do I use a Perl regExp to count sentences?
      1. This table or related slice is empty.
      1. VTDownMod
    3. VO
      singulars
      1. POHow do I use a Perl regExp to count sentences?
      1. This table or related slice is empty.
      1. VTUpMod
    1. COAre you making the assumption that every line is a sentence? I think your regex needs to be a tad more broad if you're counting sentences.
      singulars
      1. POHow do I use a Perl regExp to count sentences?
      1. USBrad Christie
    2. COWe need to see at least a couple of lines from your file that you think should be counted...
      singulars
      1. POHow do I use a Perl regExp to count sentences?
      1. USysth
    3. COAlso, I'm not as familiar with perl's regex, but this works with my tests (albeit primitive, it finds sentences, then you just have to count the matches) `[A-Z].*?[.!?]\s*(?=[A-Z]|[\r\n]+|$)` [using global flag]
      singulars
      1. POHow do I use a Perl regExp to count sentences?
      1. USBrad Christie
 

Querying!

 
Guidance
A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.

SQuiL has stopped working due to an internal error.

If you are curious you may find further information in the browser console, which is accessible through the devtools (F12).

Reload