p7zip: assorted fixes

[oi-userland.git] / components / openindiana / ca-certificates / files / list-nonasii.pl

#!/usr/bin/perl
# 
# Script to list line with characters that are not in the ASCII class
# 

while (<>) {
  if (/[[:^ascii:]]/) {
    print;
  }
}