Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical

Re^7: Split output by tabs

by shmem (Chancellor)
on Nov 13, 2012 at 14:20 UTC ( #1003621=note: print w/replies, xml ) Need Help??

in reply to Re^6: Split output by tabs
in thread Split output by tabs

And now try it with
my %handle = ( out => *STDOUT, err => *STDERR ); print {$handle{out}} "Test\n"; # Not possible without braces.

This is one of the rare cases, in which a BLOCK (which returns a file handle) is needed. For such a rare case, which anyways would have better been written as

my %handle = ( out => *STDOUT, err => *STDERR ); my $fh = $handle{out}; print $fh "Test\n"; # Look, ma! no curlies at all.

the appropriate syntax is glorified as "Best Practice"! Oh my.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1003621]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (7)
As of 2018-06-24 07:56 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (126 votes). Check out past polls.