1. Shlomi Fish
  2. shlomi-fish-homepage

Commits

Shlomi Fish  committed dc4c87d

Add another script.

  • Participants
  • Parent commits a9b10b4
  • Branches default

Comments (0)

Files changed (1)

File bin/extract-spelling-errors.pl

View file
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use autodie;
+
+use utf8;
+
+binmode STDOUT, ":utf8";
+
+open my $i, '<:utf8', 'foo.txt';
+while (my $l = <$i>)
+{
+    foreach my $m ($l =~ m/«(.*?)»/g)
+    {
+        print "$m\n";
+    }
+}
+close($i);