Help for this page

Select Code to Download


  1. or download this
    package tt;
    
    ...
    }
    
    1;
    
  2. or download this
    use strict;
    use tt;
    
    print tt::w();
    
  3. or download this
    use strict;
    use tt;
    ...
    local $SIG{__WARN__} = sub {};
    print tt::w();