Re^2: IO::File handle and printf

I tried this:

#!/usr/bin/perl

use IO::File;

$stuff="0.4312342134234234";
$morestuff="0.2432134234342342";

$fh=IO::File->new(">/tmp/foo2.txt");
$fh=sprintf($fh <<"__EOFOO__", $stuff, $morestuff);
Some stuff: %.4f
Some more stuff %.4f
__EOFOO__
[download]

But I get:

Missing comma after first argument to sprintf function at test.pl line
+ 12, near "$morestuff)"
  (Might be a runaway multi-line << string starting on line 9)
Execution of test.pl aborted due to compilation errors.
[download]

Comment on Re^2: IO::File handle and printf Select or Download Code

Replies are listed 'Best First'.
Re^3: IO::File handle and printf by Anonymous Monk on Nov 03, 2010 at 14:02 UTC
sprintf doesn't take a file handle as first argument. PS, I think you wanted to avoid having to detour over sprintf... ;-)	[reply]
Re^3: IO::File handle and printf by rakzer (Novice) on Nov 03, 2010 at 14:05 UTC
The sprintf can't work, sorry, that slipped in. What I meant to show was: `$fh=IO::File->new(">/tmp/foo2.txt"); printf($fh <<"__EOFOO__", $stuff, $morestuff); Some stuff: %.4f Some more stuff %.4f __EOFOO__` [download] As someone else pointed out, {} arround $fh will work.	[reply] [d/l]
Re^4: IO::File handle and printf by ikegami (Patriarch) on Nov 03, 2010 at 20:45 UTC
Works fine in 5.10 and 5.12. Maybe your version misinterprets `<<` as a shift operator in that situation?	[reply] [d/l]
Re^4: IO::File handle and printf by Anonymous Monk on Nov 03, 2010 at 14:13 UTC
What I meant to show was: ... And what is the problem with that? Works fine here, with various versions of Perl.	[reply]