$ perl -e'use utf8; decode($_)'
Undefined subroutine &main::decode called at -e line 1.