#!/usr/bin/perl -w

while (<>) 
{
# convert the 6 sami letters from L1 to 7bit format
s/ş/z1/g ;
s/˛/S1/g ;
s/ł/s1/g ;
s/ą/n1/g ;
s/¤/d1/g ;
s/˘/c1/g ;
s/Ą/C1/g ;

print ;
}
