$ perl -Mstrict junk
Bareword "STDIN" not allowed while "strict subs" in use at junk line 4.
Execution of junk aborted due to compilation errors.