PERL::CRITIC::POLICY::INPUTOUTPUT::REQUIREBRACEDFILEHANDLEWITHPRINT(3PM) - manual page | Library functions

Write "print {$FH} $foo, $bar;" instead.