#! perl -nw
#print if /\x{2022}/; does not work
#print if /\N{U+2022}/; does not work
#print if /\N{U+41}/;

#if (/•/){
#print;
#@x=split //,$_;
#for(@x){
#print " ",sprintf("%x",ord($_));
#}
#print "\n";
#}
#print if /\x{e2}\x{80}\x{a2}/;  #utf-8 encoded
s/\x{e2}\x{80}\x{a2} //;  #utf-8 encoded
s/ {4}INLINE /    /;
print;