Current Directory: /usr/share/doc/perl-Test-Simple/t/lib/Dev
Viewing File: /usr/share/doc/perl-Test-Simple/t/lib/Dev/Null.pm
package Dev::Null;
use strict;
sub TIEHANDLE { bless {}, shift }
sub PRINT { 1 }
1;