Perl::Critic::Policy::InputOutput::RequireBracedFileHandleWithPrint(3pm) User Contributed Perl Documentation Perl::Critic::Policy::InputOutput::RequireBracedFileHandleWithPrint(3pm)

Perl::Critic::Policy::InputOutput::RequireBracedFileHandleWithPrint - Write "print {$FH} $foo, $bar;" instead of "print $FH $foo, $bar;".

This Policy is part of the core Perl::Critic distribution.

The "print" and "printf" functions have a unique syntax that supports an optional file handle argument. Conway suggests wrapping this argument in braces to make it visually stand out from the other arguments. When you put braces around any of the special package-level file handles like "STDOUT", "STDERR", and "DATA", you must add the '*' sigil or else it won't compile under use strict 'subs'.

print $FH   "Mary had a little lamb\n";  #not ok
print {$FH} "Mary had a little lamb\n";  #ok
print   STDERR   $foo, $bar, $baz;  #not ok
print  {STDERR}  $foo, $bar, $baz;  #won't compile under 'strict'
print {*STDERR}  $foo, $bar, $baz;  #perfect!

This Policy is not configurable except for the standard options.

Jeffrey Ryan Thalhammer <jeff@imaginative-software.com>

Copyright (c) 2005-2011 Imaginative Software Systems. All rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of this license can be found in the LICENSE file included with this module.

2023-07-26 perl v5.38.0