>perl -we"trim('abc'); sub trim($) {}"
main::trim() called too early to check prototype at -e line 1.