Result:
found more than 723 distributions - search limited to the first 2001 files matching your query ( run in 2.811 )


App-Timestamper-WithElapsed

 view release on metacpan or  search on metacpan

lib/App/Timestamper/WithElapsed.pm  view on Meta::CPAN


=item *

CPAN Testers

The CPAN Testers is a network of smoke testers who run automated tests on uploaded CPAN distributions.

L<http://www.cpantesters.org/distro/A/App-Timestamper-WithElapsed>

=item *

 view all matches for this distribution


App-Todo

 view release on metacpan or  search on metacpan

bin/todo.pl  view on Meta::CPAN

        requests  => sub {list_tasks($requests_query)},
        hide      => \&hide_task,
        comment   => \&comment_task,
        dl        => \&download_textfile,
        download  => \&download_textfile,
        ul        => \&upload_textfile,
        upload    => \&upload_textfile,
        bd        => \&braindump,
        braindump => \&braindump,
        editdump  => \&editdump,
        feedback  => \&feedback,
       );

bin/todo.pl  view on Meta::CPAN

    open (my $file, ">:utf8", $filename) || die("Can't open file '$filename': $!");

    print $file $result->{_content}{result};
}

sub upload_textfile {
    my $filename = shift || shift @ARGV;
    pod2usage(-message => "Need to specify a file to upload.",
              -exitval => 1
    ) unless $filename;

    open (my $file, "< $filename"); 

bin/todo.pl  view on Meta::CPAN


    $fill_file->( $fn );

    # Call the editor with the file as the first arg
    system( "$editor $fn" );
    upload_textfile( $fn );
    unlink $fn;
}

sub editdump {
  my $query = shift || $default_query;

bin/todo.pl  view on Meta::CPAN

  todo.pl hide <task-id> date

  todo.pl comment <task-id>

  todo.pl [options] download [file]
  todo.pl upload <file>
  todo.pl braindump
  todo.pl [options] editdump

  todo.pl feedback

 view all matches for this distribution


App-Unding

 view release on metacpan or  search on metacpan

lib/App/Unding.pm  view on Meta::CPAN

# ABSTRACT: dark magic, encrypted wallet

use v5.6.0;

# THIS IS A STUB MODULE FOR CPAN INDEXING
# https://www.perl.com/article/how-to-upload-a-script-to-cpan/

1;

__END__

lib/App/Unding.pm  view on Meta::CPAN


=head1 SYNOPSIS

This is a stub module for cpan indexing.
No funcionality implemented.
See L<https://www.perl.com/article/how-to-upload-a-script-to-cpan/> for the reason.

You find the implementation in the script L<unding>.

=head1 AUTHOR

 view all matches for this distribution


App-Waf

 view release on metacpan or  search on metacpan

lib/App/Waf.pm  view on Meta::CPAN

    '\.(bak|inc|old|mdb|sql|backup|java|class)$',
    '\.(svn|htaccess|bash_history)',
    '(vhost|bbs|host|wwwroot|www|site|root|hytop|flashfxp).*\.rar',
    '(phpmyadmin|jmx-console|jmxinvokerservlet)',
    '/xmlrpc.php',
'/(attachments|upimg|images|css|uploadfiles|html|uploads|templets|static|template|data|inc|forumdata|upload|includes|cache|avatar)/(\w+).(php|jsp|asp)',

);

sub tail {

 view all matches for this distribution


App-Wallflower

 view release on metacpan or  search on metacpan

bin/wallflower  view on Meta::CPAN

A possible dataflow would be processing forms on your development server
(maybe to update a local database), then I<publish> as static pages
a I<subset> of all the URLs the application supports.

Turning that application into a real static site (a set of pages
to upload to a static web server) is just a matter of generating all
possible URLs for the static site and saving the corresponding pages to files.

B<wallflower> does just that. It reads a list of URLs, strips off
any query strings, issues HTTP C<GET> requests for each in turn and
saves the response body to a file with a name derived from the request

 view all matches for this distribution


App-Wax

 view release on metacpan or  search on metacpan

bin/wax  view on Meta::CPAN

Windows C<cmd>/C<command.exe>-like shells.

It's worth checking that a program actually needs waxing. Many command-line
programs already support URLs, e.g:

    $ eog https://upload.wikimedia.org/wikipedia/commons/4/4c/Eye_of_GNOME.png
    $ gedit https://projects.gnome.org/gedit/
    $ gimp https://upload.wikimedia.org/wikipedia/commons/6/6c/Gimpscreen.png
    $ vim https://www.vim.org/

etc.

=head1 VERSION

 view all matches for this distribution


App-Wikidata-Template-CS-CitaceMonografie

 view release on metacpan or  search on metacpan

t/data/Q1085.json  view on Meta::CPAN

                "P854": [
                  {
                    "hash": "e6bbec4d4f393333842c6ce50cb226192520bafc",
                    "datatype": "url",
                    "datavalue": {
                      "value": "https://www.ovpm.org/wp-content/uploads/2024/03/liste-villes-en-regle-pour-page-web12-03-2024.pdf",
                      "type": "string"
                    },
                    "property": "P854",
                    "snaktype": "value"
                  }

t/data/Q1085.json  view on Meta::CPAN

                "P854": [
                  {
                    "hash": "1e0785746cc4d82d1cd121ebf48831ccc41f14ce",
                    "datatype": "url",
                    "datavalue": {
                      "value": "http://cnig.gouv.fr/wp-content/uploads/2020/02/CNT-PVM_r%C3%A9vis%C3%A9_2020-01-27-1.pdf",
                      "type": "string"
                    },
                    "property": "P854",
                    "snaktype": "value"
                  }

t/data/Q1085.json  view on Meta::CPAN

                "P854": [
                  {
                    "datatype": "url",
                    "hash": "1e0785746cc4d82d1cd121ebf48831ccc41f14ce",
                    "datavalue": {
                      "value": "http://cnig.gouv.fr/wp-content/uploads/2020/02/CNT-PVM_r%C3%A9vis%C3%A9_2020-01-27-1.pdf",
                      "type": "string"
                    },
                    "property": "P854",
                    "snaktype": "value"
                  }

 view all matches for this distribution


App-WordPressTools

 view release on metacpan or  search on metacpan

CONTRIBUTING  view on Meta::CPAN


          git checkout master
          dzil release

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

 view all matches for this distribution


App-XML-DocBook-Builder

 view release on metacpan or  search on metacpan

lib/App/Docmake.pm  view on Meta::CPAN


=item *

CPAN Testers

The CPAN Testers is a network of smoke testers who run automated tests on uploaded CPAN distributions.

L<http://www.cpantesters.org/distro/A/App-XML-DocBook-Builder>

=item *

 view all matches for this distribution


App-YTDL

 view release on metacpan or  search on metacpan

lib/App/YTDL/Arguments.pm  view on Meta::CPAN

    }

    URL_DATA: for my $webpage_url ( @args ) {
        my ( $ex, $up, $ids ) = @{$urls_data->{$webpage_url}};
        if ( @$ids > 1 ) {
            my $prompt = $data->{$ex}{$up}{$ids->[0]}{uploader} || $webpage_url;
            my $chosen_ids = choose_videos( $set, $opt, $data, $ex, $up, $ids, $prompt );
            if ( ! defined $chosen_ids ) {
                next URL_DATA;
            }
            push @{$chosen->{$ex}{$up}}, @$chosen_ids;

 view all matches for this distribution


App-Ylastic-CostAgent

 view release on metacpan or  search on metacpan

lib/App/Ylastic/CostAgent.pm  view on Meta::CPAN

  accounts
  config_file
  dir
  logger
  mech
  upload
  ylastic_id
);

my %URL = (
  ylastic_service_list  => "http://ylastic.com/cost_services.list",
  ylastic_upload_form   => "http://ylastic.com/usage_upload.html",
  aws_usage_report_form => "https://aws-portal.amazon.com/gp/aws/developer/account/index.html?ie=UTF8&action=usage-report",
);

#--------------------------------------------------------------------------#
# new -- constructor
#
# Parameters for new:
#   * config_file -- path to a .ini style configuration file (required)
#   * dir -- a directory to hold downloaded data (defaults to a tempdir)
#   * logger -- a Log::Dispatchouli object (defaults to a null logger)
#   * upload -- whether to upload data to Ylastic (default is false)
#--------------------------------------------------------------------------#

sub new {
  my $class = shift;
  my $self = $class->SUPER::new( @_ );

lib/App/Ylastic/CostAgent.pm  view on Meta::CPAN


  return $self;
}

#--------------------------------------------------------------------------#
# run -- downloads and possibly uploads data for all accounts from config
#--------------------------------------------------------------------------#

sub run {
  my $self = shift;

  for my $account ( @{ $self->accounts } ) {
    my $zipfile = $self->_download_usage( $account );
    $self->_upload_usage( $account, $zipfile )
      if $self->upload;
  }

  return 0;
}

lib/App/Ylastic/CostAgent.pm  view on Meta::CPAN

sub _start_date {
  state $start_date = Time::Piece::Month->new("2010-01-01")->start;
  return $start_date;
}

sub _upload_usage {
  my ($self, $account, $zipfile) = @_;
  $self->_initialize_mech;
  $self->mech->get($URL{ylastic_upload_form});
  $self->mech->submit_form(
    form_name => 'upload',
    fields => {
      file1 => $zipfile,
    }
  );
  $self->logger->log(["Uploaded usage reports to Ylastic for account %s",$account->[0]]);

lib/App/Ylastic/CostAgent.pm  view on Meta::CPAN

accounts
config_file
dir
logger
mech
upload
ylastic_id

=for :stopwords cpan testmatrix url annocpan anno bugtracker rt cpants kwalitee diff irc mailto metadata placeholders

=head1 SUPPORT

 view all matches for this distribution


App-YoutubeDlUtils

 view release on metacpan or  search on metacpan

script/youtube-dl-timestamp  view on Meta::CPAN


use 5.010001;
use strict;
use warnings;

system "youtube-dl", "-o", '%(upload_date)s-%(title)s-%(id)s.%(ext)s', @ARGV;

# PODNAME: youtube-dl-timestamp
# ABSTRACT: Download video with youtube-dl, prefix filename with upload date

__END__

=pod

=encoding UTF-8

=head1 NAME

youtube-dl-timestamp - Download video with youtube-dl, prefix filename with upload date

=head1 VERSION

This document describes version 0.007 of youtube-dl-timestamp (from Perl distribution App-YoutubeDlUtils), released on 2020-09-09.

script/youtube-dl-timestamp  view on Meta::CPAN


This is a wrapper for B<youtube-dl> which does the following:

=over

=item * add upload date prefix (YYYYMMDD) to the filename

The wrapper adds this option:
C
 -o '%(upload_date)s-%(title)s-%(id)s.%(ext)s'

So instead of the default '%(title)s-%(id)s.%(ext)s' filename pattern like
these:

 Introduction to Astronomy: Crash Course Astronomy #1-0rHUDWjR5gg.mp4

 view all matches for this distribution


App-YtDlpUtils

 view release on metacpan or  search on metacpan

script/yt-dlp-timestamp  view on Meta::CPAN

our $AUTHORITY = 'cpan:PERLANCAR'; # AUTHORITY
our $DATE = '2024-07-09'; # DATE
our $DIST = 'App-YtDlpUtils'; # DIST
our $VERSION = '0.001'; # VERSION

system "yt-dlp", "-o", '%(upload_date)s-%(title)s-%(id)s.%(ext)s', @ARGV;

# PODNAME: yt-dlp-timestamp
# ABSTRACT: Download video with yt-dlp, prefix filename with upload date

__END__

=pod

=encoding UTF-8

=head1 NAME

yt-dlp-timestamp - Download video with yt-dlp, prefix filename with upload date

=head1 VERSION

This document describes version 0.001 of yt-dlp-timestamp (from Perl distribution App-YtDlpUtils), released on 2024-07-09.

script/yt-dlp-timestamp  view on Meta::CPAN


This is a wrapper for B<yt-dlp> which does the following:

=over

=item * add upload date prefix (YYYYMMDD) to the filename

The wrapper adds this option:
C
 -o '%(upload_date)s-%(title)s-%(id)s.%(ext)s'

So instead of the default '%(title)s-%(id)s.%(ext)s' filename pattern like
these:

 Introduction to Astronomy: Crash Course Astronomy #1-0rHUDWjR5gg.mp4

 view all matches for this distribution


App-Zapzi

 view release on metacpan or  search on metacpan

dist.ini  view on Meta::CPAN

[CheckChangesHasContent]

;; Prompt before releasing to CPAN
[ConfirmRelease]

;; Automatically upload to CPAN on release
[UploadToCPAN]

;; Write the next release number to the changelog
[NextRelease]

 view all matches for this distribution


App-ZofCMS-PluginBundle-Naughty

 view release on metacpan or  search on metacpan

lib/App/ZofCMS/Plugin/ImageGallery.pm  view on Meta::CPAN

        unless defined $ext;

    my $photo_file = File::Spec->catfile( $conf->{photo_dir}, $conf->{filename} . $ext );
    my $thumb_file = File::Spec->catfile( $conf->{thumb_dir}, $conf->{filename} . $ext );

    my $fh = $cgi->upload('plug_image_gallery_file')
        or do {
            $t->param(
                error => 'Failed to upload file' . (
                    $cgi->cgi_error ? ': ' . $cgi->cgi_error : ''
                )
            );
            $t->param( success => 1 );
            return;

lib/App/ZofCMS/Plugin/ImageGallery.pm  view on Meta::CPAN

}

sub _form_template {
    return <<'END_TEMPLATE';
<tmpl_if name='success'>
    <p>Your image has been successfully uploaded.</p>
    <p><a href="<tmpl_var escape='html' name='success_href'>">Upload another image</a></p>
<tmpl_else>
    <form action="" method="POST" id="plug_image_gallery_form" enctype="multipart/form-data">
    <div>
        <tmpl_if name='error'><p class="error"><tmpl_var escape='html' name='error'></p></tmpl_if>

lib/App/ZofCMS/Plugin/ImageGallery.pm  view on Meta::CPAN

In your L<HTML::Template> template:

    <tmpl_var name='plug_image_gallery_form'>
    <tmpl_var name='plug_image_gallery_list'>

Viola, now you can upload photos with descriptions, delete them and edit descriptions. \o/

=head1 DESCRIPTION

The module is a plugin for L<App::ZofCMS> that allows one to add a CRUD-like functionality
for managing photos. The plugin automatically makes thumbnails and can also resize the
actual photos if you tell it to. So far, only
C<.jpg>, C<.png> and C<.gif> images are supported; however, plugin does not check
C<Content-Type> of the uploaded image.

The image file name and description are stored in a SQL database.

This documentation assumes you've read L<App::ZofCMS>, L<App::ZofCMS::Config> and L<App::ZofCMS::Template>

lib/App/ZofCMS/Plugin/ImageGallery.pm  view on Meta::CPAN

=head3 C<filename>

    filename => '[:rand:]',

B<Optional>. Specifies the name for the image file (and its thumbnail) without the extension
for when new image is uploaded. You'd obviously want to manipulate this value with some
other plugin (e.g. L<App::ZofCMS::Plugin::Sub>) to make sure it's not the same
as existing images. B<Special value> of C<[:rand:]> (value includes the brackets) will make
the plugin generate random filenames (along with check of whether the generated name
already exists). B<Defaults to:> C<[:rand:]>

lib/App/ZofCMS/Plugin/ImageGallery.pm  view on Meta::CPAN


    no_form => 1,

B<Optional>. Takes either true or false values. When
set to a B<false> value, the plugin will generate as well as process an HTML form that
is to be used for uploading new images or editing descriptions on existing ones.
B<Note:> even if you are making your own HTML form, the plugin will B<not> process
editing or deleting of items when C<no_form> is set to a true value. B<Defaults to:> C<1>

=head3 C<no_list>

lib/App/ZofCMS/Plugin/ImageGallery.pm  view on Meta::CPAN

        </ul>
        <input type="submit" name="plug_image_gallery_submit" value="Update">
    </div>
    </form>

=head2 form when upload or update was successful

    <p>Your image has been successfully uploaded.</p>
    <p><a href="/index.pl?page=photos&amp;amp;dir=/admin/">Upload another image</a></p>

=head2 list (when both C<allow_edit> and C<has_view> is set to true values)

    <ul class="plug_image_gallery_list">

 view all matches for this distribution


App-ZofCMS

 view release on metacpan or  search on metacpan

lib/App/ZofCMS.pm  view on Meta::CPAN

occasionally don't even offer any SQL databases. If you have more freedom
than that you may want to give L<Catalyst> a try which, my opinion, is
a great framework, not just for web, and it offers far more functionality
than ZofCMS ever will.

ZofCMS is plugin based. If you create your own plugins, please upload them
to L<App::ZofCMS::Plugin> namespace or email it to me (C<zoffix@cpan.org>)
and I will package it, upload it, and give you corresponding credits.

ZofCMS currently uses L<HTML::Template> as a module to interpret HTML
templates. And so far, I have no plans to change this to anything alike
L<Template::Toolkit>.

Despite the "core" of the framework along with all of its plugins being
on CPAN there is a helper script (C<zofcms_helper>) which can produce
a ready-for-upload set of files which you can simply upload to your server
without having to install anything from CPAN on the server itself. See
C<perldoc zofcms_helper>.

=head1 HYSTORY

lib/App/ZofCMS.pm  view on Meta::CPAN


The last site I coded before starting to implement ZofCMS was a private
web application which had a message board along with a few other features.
Mostly everything was coded from scratch once more... The final breaking
point when a few weeks later I was asked to add two sections for file
uploads to that site. No, it wasn't hard to add them, it's just that
I found myself adding a couple lines of code to the "core" modules that
called modules which provided new functionality and those modules were
loaded on any page of the site; even the ones that would never require
functionality from those modules. That's where the idea of plugins came
to life including the idea of "page templates" asking for plugins which

 view all matches for this distribution


App-ansiecho

 view release on metacpan or  search on metacpan

minil.toml  view on Meta::CPAN

module_maker = "ModuleBuildTiny"
static_install = "auto"

[release]
branch = "main"
do_not_upload_to_cpan = 0

 view all matches for this distribution


App-bsky

 view release on metacpan or  search on metacpan

lib/App/bsky.pm  view on Meta::CPAN

                    my ( $content, $headers ) = $bsky->at->http->get($avatar);
                    use Carp;
                    $content // confess 'failed to download avatar from ' . $avatar;

                    # TODO: check content type HTTP::Tiny and Mojo::UserAgent do this differently
                    $avatar = $bsky->uploadFile( $content, $headers->{'content-type'} );
                }
                elsif ( -e $avatar ) {
                    use Path::Tiny;
                    $avatar = path($avatar)->slurp_raw;
                    my $type = substr( $avatar, 0, 2 ) eq pack 'H*',
                        'ffd8' ? 'image/jpeg' : substr( $avatar, 1, 3 ) eq 'PNG' ? 'image/png' : 'image/jpeg';    # XXX: Assume it's a jpeg?
                    $avatar = $bsky->uploadFile( $avatar, $type );
                }
                else {
                    $self->err('unsure what to do with this avatar; does not seem to be a URL or local file');
                }
                if ($avatar) {
                    $self->say( 'uploaded avatar... %d bytes', $avatar->{size} );
                }
                else {
                    $self->say('failed to upload avatar');
                }
            }
            if ( defined $banner ) {
                if ( $banner =~ m[^https?://] ) {
                    my ( $content, $headers ) = $bsky->at->http->get($banner);
                    use Carp;
                    $content // confess 'failed to download banner from ' . $banner;

                    # TODO: check content type HTTP::Tiny and Mojo::UserAgent do this differently
                    $banner = $bsky->uploadFile( $content, $headers->{'content-type'} );
                }
                elsif ( -e $banner ) {
                    use Path::Tiny;
                    $banner = path($banner)->slurp_raw;
                    my $type = substr( $banner, 0, 2 ) eq pack 'H*',
                        'ffd8' ? 'image/jpeg' : substr( $banner, 1, 3 ) eq 'PNG' ? 'image/png' : 'image/jpeg';    # XXX: Assume it's a jpeg?
                    $banner = $bsky->uploadFile( $banner, $type );
                }
                else {
                    $self->err('unsure what to do with this banner; does not seem to be a URL or local file');
                }
                if ($banner) {
                    $self->say( 'uploaded banner... %d bytes', $banner->{size} );
                }
                else {
                    $self->say('failed to upload banner');
                }
            }
            my $res = $bsky->at->put_record(
                'app.bsky.actor.profile',
                'self',

 view all matches for this distribution


App-cat-v

 view release on metacpan or  search on metacpan

minil.toml  view on Meta::CPAN

branch = "main"
hooks = [
    "make -C script",
    "make -C docs",
]
do_not_upload_to_cpan = 0

 view all matches for this distribution


App-chars2code

 view release on metacpan or  search on metacpan

INSTALL  view on Meta::CPAN

上記は  Perlのモジュールのインストールでよく用いられる方法である。

■ cpanmやcpanによる一般的なインストールの方法は下記で網羅的に説明をしている。

1. https://metacpan.org/release/TULAMILI/Table-Hack-0.12/source/Table-Hack.pdf
2. https://www.ite.or.jp/wp/wp-content/uploads/opendata/tool201807.pdf

上記2個のURLにある同じPDF形式ファイルは、2018年に下野寿之が書いたものである。

-- 2022-10-14(fri) Toshiyuki Shimono bin4tsv@gmail.com

 view all matches for this distribution


App-chartimes

 view release on metacpan or  search on metacpan

INSTALL  view on Meta::CPAN

上記は  Perlのモジュールのインストールでよく用いられる方法である。

■ cpanmやcpanによる一般的なインストールの方法は下記で網羅的に説明をしている。

1. https://metacpan.org/release/TULAMILI/Table-Hack-0.12/source/Table-Hack.pdf
2. https://www.ite.or.jp/wp/wp-content/uploads/opendata/tool201807.pdf

上記2個のURLにある同じPDF形式ファイルは、2018年に下野寿之が書いたものである。   

   

 view all matches for this distribution


App-chot

 view release on metacpan or  search on metacpan

minil.toml  view on Meta::CPAN


exclude_match = ['^CLAUDE\.md$']

[release]
branch = "main"
do_not_upload_to_cpan = 0

 view all matches for this distribution


App-cloc

 view release on metacpan or  search on metacpan

bin/cloc  view on Meta::CPAN

                    configure.in
                    depcomp
                    gendocs.sh
                    gitlog-to-changelog
                    git-version-gen
                    gnupload
                    gnu-web-doc-update
                    install-sh
                    libtool
                    libtool.m4
                    link-warning.h

 view all matches for this distribution


App-cloudconvert

 view release on metacpan or  search on metacpan

lib/App/cloudconvert.pm  view on Meta::CPAN


    my %params = (
        inputformat => $self->{from},
        outputformat => $self->{to},
        apikey => $self->{apikey},
        input => "upload",
        download => "inline",
        file => [ $inputfile ]
    );

    if ($self->{dry}) {

 view all matches for this distribution


App-cmdout2git

 view release on metacpan or  search on metacpan

INSTALL  view on Meta::CPAN



■ cpanmやcpanによる一般的なインストールの方法は、下記で網羅的に説明をしている。

1. https://metacpan.org/release/TULAMILI/Table-Hack-0.12/source/Table-Hack.pdf
2. https://www.ite.or.jp/wp/wp-content/uploads/opendata/tool201807.pdf

上記2個のURLにある同じPDF形式ファイルは、2018年に下野寿之が書いたものであり、
それぞれ26ページである。


 view all matches for this distribution


App-colcount

 view release on metacpan or  search on metacpan

INSTALL  view on Meta::CPAN

上記は  Perlのモジュールのインストールでよく用いられる方法である。

■ cpanmやcpanによる一般的なインストールの方法は下記で網羅的に説明をしている。

1. https://metacpan.org/release/TULAMILI/Table-Hack-0.12/source/Table-Hack.pdf
2. https://www.ite.or.jp/wp/wp-content/uploads/opendata/tool201807.pdf

上記2個のURLにある同じPDF形式ファイルは、2018年に下野寿之が書いたものである。   

 view all matches for this distribution


App-coldigits

 view release on metacpan or  search on metacpan

INSTALL  view on Meta::CPAN

上記は  Perlのモジュールのインストールでよく用いられる方法である。

■ cpanmやcpanによる一般的なインストールの方法は下記で網羅的に説明をしている。

1. https://metacpan.org/release/TULAMILI/Table-Hack-0.12/source/Table-Hack.pdf
2. https://www.ite.or.jp/wp/wp-content/uploads/opendata/tool201807.pdf

上記2個のURLにある同じPDF形式ファイルは、2018年に下野寿之が書いたものである。   

 view all matches for this distribution


App-cpan2arch

 view release on metacpan or  search on metacpan

t/lib/TestData.pm  view on Meta::CPAN

                'perl-cpan-meta-requirements>=2.120620',
                'perl-extutils-makemaker',
                'perl-module-metadata',
            ],
            optdepends => [
                q{perl-app-nopaste: Nopaste plugin - upload a session\'s input and output to a Pastebin},
                'perl-b-keywords: Keywords completion driver - tab complete Perl keywords and operators',
                'perl-cpan-meta>=2.120900',
                'perl-data-dump-streamer>=2.39: DDS plugin - better format results with Data::Dump::Streamer',
                'perl-data-dumper-concise: DDC plugin - even better format results with Data::Dumper::Concise',
                'perl-file-next: INC completion driver - tab complete module names in use and require',

t/lib/TestData.pm  view on Meta::CPAN

                'perl-test-fatal'
                'perl-test-simple'
                'perl>=5.8.1'
            )
            optdepends=(
                $'perl-app-nopaste: Nopaste plugin - upload a session\'s input and output to a Pastebin'
                'perl-b-keywords: Keywords completion driver - tab complete Perl keywords and operators'
                'perl-cpan-meta>=2.120900'
                'perl-data-dump-streamer>=2.39: DDS plugin - better format results with Data::Dump::Streamer'
                'perl-data-dumper-concise: DDC plugin - even better format results with Data::Dumper::Concise'
                'perl-file-next: INC completion driver - tab complete module names in use and require'

t/lib/TestData.pm  view on Meta::CPAN

                'perl-version',
                'perl>=5.10.1',
            ],
            makedepends => ['perl-module-build-tiny>=0.035'],
            optdepends  => [
                'perl-cpan-uploader',
                'perl-devel-checklib',
                'perl-devel-ppport',
                'perl-dist-zilla',
                'perl-pod-escapes',
                'perl-software-license>=0.103010',

t/lib/TestData.pm  view on Meta::CPAN

                'perl-test-output'
                'perl-test-requires'
                'perl-test-simple'
            )
            optdepends=(
                'perl-cpan-uploader'
                'perl-devel-checklib'
                'perl-devel-ppport'
                'perl-dist-zilla'
                'perl-pod-escapes'
                'perl-software-license>=0.103010'

 view all matches for this distribution


App-cpanel

 view release on metacpan or  search on metacpan

lib/App/cpanel.pm  view on Meta::CPAN

  $ cpanel api2 Fileman mkdir path= name=new-dir-at-top

  # this one is one at a time but can overwrite files
  $ cpanel api2 Fileman savefile dir=public_html/cgi-bin filename=hello-world content="$(cat public_html/cgi-bin/hello-world)"
  # this is multiple files but refuses to overwrite
  $ cpanel upload public_html/cgi-bin hello-world

  # download
  $ cpanel mirror public_html public_html cpanel localfs
  # upload
  $ cpanel mirror public_html public_html localfs cpanel

=head1 DESCRIPTION

CLI for cPanel UAPI and also API 2, due to missing functionality in UAPI.

lib/App/cpanel.pm  view on Meta::CPAN

use Mojo::Util qw(dumper encode);

my %cmd2func = (
  uapi => [ \&uapi_p, 1 ],
  download => [ \&download_p, 0 ],
  upload => [ \&upload_p, 1 ],
  api2 => [ \&api2_p, 1 ],
  mirror => [ \&mirror_p, 1 ],
);
my $token_file = "$ENV{HOME}/.cpanel-token";
my $domain_file = "$ENV{HOME}/.cpanel-domain";

lib/App/cpanel.pm  view on Meta::CPAN

    die $res->code . ": " . $res->message . "\n" if $res->code != 200;
    $res->body;
  });
}

sub make_upload_form {
  my $dir = shift;
  my $counter = 0;
  +{
    dir => $dir,
    map {

lib/App/cpanel.pm  view on Meta::CPAN

      });
    } @_,
  };
}

sub upload_p {
  my ($dir, @files) = @_;
  die "No dir\n" unless $dir;
  die "No files\n" unless @files;
  my ($token, $domain) = (read_token(), read_domain());
  my $tx_p = api_request 'post_p', $domain, $token,
    [ 'execute', 'Fileman', 'upload_files' ],
    undef,
    form => make_upload_form($dir, @files),
    ;
  $tx_p->then(\&_error_or_json)->then(\&_uapi_error_or_json);
}

sub _api2_error_or_json {

 view all matches for this distribution


App-cpanminus

 view release on metacpan or  search on metacpan

lib/App/cpanminus/fatscript.pm  view on Meta::CPAN

    my %prop = $d->properties;
  
  =head1 DESCRIPTION
  
  Many online services that are centered around CPAN attempt to
  associate multiple uploads by extracting a distribution name from
  the filename of the upload. For most distributions this is easy as
  they have used ExtUtils::MakeMaker or Module::Build to create the
  distribution, which results in a uniform name. But sadly not all
  uploads are created in this way.
  
  C<CPAN::DistnameInfo> uses heuristics that have been learnt by
  L<http://search.cpan.org/> to extract the distribution name and
  version from filenames and also report if the version is to be
  treated as a developer release

 view all matches for this distribution


( run in 2.811 seconds using v1.01-cache-2.11-cpan-b16cb0d3907 )