package Dev::Null;
use strict;
sub TIEHANDLE { bless {}, shift }
sub PRINT { 1 }
1;