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();