3 ms·
> At first, I thought I had to be missing something, Well, Data::Dumper is included in core Perl ... use v5.12.0; use warnings; use autodie; u
by lanx 4y ago
> At first, I thought I had to be missing something,
Well, Data::Dumper is included in core Perl ...
use v5.12.0;
use warnings;
use autodie;
use Data::Dumper;
sub logit {
open state $log, ">>", 'c:/tmp/foo';
print $log Dumper(@_)
}
logit(123);
logit(["spam", "eggs"]);
logit({"(1,2)"=> [3,4,5],"('spam','eggs')"=> [6,7,8]});
# even logging multiple objects at once ...
logit(
123,
["spam", "eggs"],
{"(1,2)"=> [3,4,5],"('spam','eggs')"=> [6,7,8]},
);
NB: Perl has neither tuples nor sets, but there are workarounds.
And I opened the filehandle only once. And for append not overwrite like you did.