my $out = new Filter::Handle(\*STDOUT);
$out->print("Hello world\n");
$out->printf("%s %s\n", "Hello", "world");