$ perl -E " print {select()} 6 "
6

$ perl -Mstrict -le " print {select()} 6 "
Can't use string ("main::STDOUT") as a symbol ref while "strict refs" in use at -e line 1.