[svn-inject] Installing original source of scowl

[deb_pkgs/scowl.git] / src / clean-alan-list

#!/usr/bin/perl

while (<>) 
{
  s/\r?\n$// or die;
  s/[.:]$//;
  next if /[ .\/-]/;
  print "$_\n";
  die unless /^[A-Za-z']+$/;
}