Perl::Critic::Policy::InputOutput::ProhibitReadlineInForLoop(3pm) on Linux

The text 1ff344c3397c, as Debian 11 (Bullseye) shipped it.

Write "while( $line = <> ){...}" instead of "for(<>){...}".