Edit file File name : Null.pm Content :package Dev::Null; use strict; sub TIEHANDLE { bless {}, shift } sub PRINT { 1 } 1; Save