[p5sagit/p5-mst-13.2.git] / ext / Test-Simple / t / lib / Dev / Null.pm

package Dev::Null;

use strict;

sub TIEHANDLE { bless {}, shift }
sub PRINT { 1 }

1;
Commit	Line	Data
c1d0a804	1	package Dev::Null;
c1d0a804	2
3e887aae	3	use strict;
	4
	5	sub TIEHANDLE { bless {}, shift }
c1d0a804	6	sub PRINT { 1 }
	7
	8	1;