perl "-Mencoding=whatever,Filter=>1" yourscript