Sell script for removing BOM (Byte Order Mark)   :

# Rename all file extension (.src) to  (.bom)
for f in *.src;
    do mv $f `basename $f .src`.bom;
done

# Remove BOM characters for all *.bom files  and create new files with file extention # of .src

for f in *.bom;
   do perl -CD -pe 'tr/\x{feff}//d' ${f##/*/} > `basename $f .bom`.src
done

# Delete all  Files with file extension of .bom
rm -f *.bom

arrow
arrow
    全站熱搜

    DanBrother 發表在 痞客邦 留言(0) 人氣()