view release on metacpan or  search on metacpan

README.md  view on Meta::CPAN

    print number_format(100000); # 100_000
    print number_price(100000);  # \100_000

thousands\_sep and int\_curr\_symbol are given to all of -number kind of function.

## DO SOMETHING WITHOUT EXPORTING ANYTHING

    -strict => [
       [ 'strict' => {
           '.' => sub {
              strict->import();
              warnings->import();
           },
         }
       ];

This definition works like as pragma.

    use Util::Yours -strict;

function name '.' is special. This name is not exported and only execute the code in the definition.

lib/Util/Any.pm  view on Meta::CPAN

 print number_format(100000); # 100_000
 print number_price(100000);  # \100_000

thousands_sep and int_curr_symbol are given to all of -number kind of function.

=head2 DO SOMETHING WITHOUT EXPORTING ANYTHING

 -strict => [
    [ 'strict' => {
        '.' => sub {
           strict->import();
           warnings->import();
        },
      }
    ];

This definition works like as pragma.

 use Util::Yours -strict;

function name '.' is special. This name is not exported and only execute the code in the definition.