perl -ple"BEGIN{ $/=\45} $_ = pack 'u', $_" file