summaryrefslogtreecommitdiff
path: root/t/lib/TieOut.pm
diff options
context:
space:
mode:
Diffstat (limited to 't/lib/TieOut.pm')
-rw-r--r--t/lib/TieOut.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/t/lib/TieOut.pm b/t/lib/TieOut.pm
index 0da80cbb0e..072e8fdef6 100644
--- a/t/lib/TieOut.pm
+++ b/t/lib/TieOut.pm
@@ -9,6 +9,12 @@ sub PRINT {
$$self .= join('', @_);
}
+sub PRINTF {
+ my $self = shift;
+ my $fmt = shift;
+ $$self .= sprintf $fmt, @_;
+}
+
sub read {
my $self = shift;
return substr($$self, 0, length($$self), '');