view release on metacpan or  search on metacpan

CONTRIBUTING  view on Meta::CPAN

      Then edit Changes and summarize the changes after the {{$NEXT}}
      token. Just leave the file uncommitted; it will automatically be
      committed in the next step.

      2. Run the release script and follow the prompts:

          git checkout master
          dzil release

      The release script will take care of making the release commit (with
      Changes), tagging, and uploading to the CPAN.

lib/App/WordPressTools/Contributing.pod  view on Meta::CPAN

Then edit F<Changes> and summarize the changes after the C<{{$NEXT}}> token. Just leave the file uncommitted; it will
automatically be committed in the next step.

=item 2.

Run the release script and follow the prompts:

    git checkout master
    dzil release

The release script will take care of making the release commit (with F<Changes>), tagging, and uploading to the CPAN.

=back

=cut

script/wp-tools  view on Meta::CPAN

        my $dums = eval{`du -ms $wp_content_path/*`};
        my $wp_content_size;
        for my $entry (split(/[\r\n]+/, $dums)) {
            my ($size, $path) = $entry =~ m/^(\d+).*wp-content\/(.*)$/;
            $wp_content_size->{$path} = $size;
        }
        eval {
            opendir (my $dh, $wp_content_path) || die;
            while (my $path = readdir $dh) {
                next if $path eq '.' || $path eq '..';
                if ($path =~ /(?:backup|upload)/i) {
                    $skippable->{$path} = $wp_content_size->{$path};
                }
                if ($wp_content_size->{$path} && $wp_content_size->{$path} > 200 && $path !~ /^(?:themes|plugins|mu-plugins|translations|languages)$/) {
                    $skippable->{$path} = $wp_content_size->{$path};
                }
            }
        };

        my @paths = map { -e "$nice_path/$_" ? shell_quote("$nice_path/$_") : () } @backup_whitelist;
        my $paths = join(' ', @paths);