#!/bin/sh cat $1 |perl -MEncode=from_to -pe ' s/\r\n/\n/o; from_to($_,"shiftjis","utf8"); '