view release on metacpan or search on metacpan
lib/App/MBUtiny/Storage/HTTP.pm view on Meta::CPAN
$ostat = 0;
}
# Upload file
if ($ostat) {
$client->upload(file => $file, name => $name) or do {
$self->error(join("\n", $client->transaction, $client->error));
$ostat = 0;
};
}
lib/App/MBUtiny/Storage/HTTP.pm view on Meta::CPAN
my %args = @_;
my $string_ret = $self->request(GET => $self->_merge_path_query($args{path}, $args{host})) || "";
my @array_ret = map {$_ = trim($_)} split /\s*\n+\s*/, $string_ret;
return wantarray ? @array_ret : $string_ret;
}
sub upload {
my $self = shift;
my %args = @_;
my $file = $args{file} || ''; # File for uploading! /path/to/file.tar.gz
my $name = $args{name} || basename($file); # File name! file.tar.gz
my $path = $args{path} ? sprintf("%s/%s", $args{path}, $name) : $name; # Path for request: /foo/bar
$self->request(PUT => $self->_merge_path_query($path), sub {
my $req = shift; # HTTP::Request object
$req->header('Content-Type', CONTENT_TYPE);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/MHFS/HTTP/Server.pm view on Meta::CPAN
if(index($Config{osname}, 'linux') != -1) {
use Socket qw(TCP_QUICKACK);
$sock->setsockopt(IPPROTO_TCP, TCP_QUICKACK, 1) or die("Failed to set TCP_QUICKACK");
}
my $evp = MHFS::EventLoop::Poll->new;
my %self = ( 'settings' => $settings, 'routes' => $routes, 'route_default' => sub { $_[0]->SendDirectory($settings->{'DOCUMENTROOT'}); }, 'plugins' => $plugins, 'sock' => $sock, 'evp' => $evp, 'uploaders' => [], 'sesh' =>
{ 'newindex' => 0, 'sessions' => {}}, 'resources' => {}, 'loaded_plugins' => {});
bless \%self, $class;
$evp->set($sock, \%self, POLLIN);
lib/MHFS/HTTP/Server.pm view on Meta::CPAN
foreach my $timer (@{$plugin->{'timers'}}) {
say __PACKAGE__.': adding '.ref($plugin).' timer';
$self{'evp'}->add_timer(@{$timer});
}
if(my $func = $plugin->{'uploader'}) {
say __PACKAGE__.': adding '. ref($plugin) .' uploader';
push (@{$self{'uploaders'}}, $func);
}
foreach my $route (@{$plugin->{'routes'}}) {
say __PACKAGE__.': adding ' . ref($plugin) . ' route ' . $route->[0];
push @{$self{'routes'}}, $route;
}
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Magpie/Action/Recent.pm view on Meta::CPAN
sub run {
my ($self) = @_;
# get raw list of uploads
$self->log( "fetching list of recent uploads" );
my $dayago = time() - ( 24 * 60 * 60 );
my @uploads = uniq
apply { s{^.*/}{}; s{-[^-]*$}{}; s{-}{::}g; }
CPAN::Recent::Uploads->recent( $dayago );
# check if available within mageia
$self->log( "filter out modules available in mageia" );
my $urpm = App::Magpie::URPM->instance;
my @nomageia =
grep { scalar($urpm->packages_providing($_)) == 0 }
@uploads;
# raw list transformed distname such as:
# L/LI/LIOSHA/Geo-Openstreetmap-Parser-0.02.tar.gz
# to:
# Geo::Openstreetmap::Parser
lib/App/Magpie/Action/Recent.pm view on Meta::CPAN
next if $@;
say $module;
$nbvalid++;
}
# $self->log( "uploads: " . scalar(@uploads) );
# $self->log( "nomageia: " . scalar(@nomageia) );
# $self->log( "valid: $nbvalid" );
my $uploads = @uploads;
my $percent = 100 - int( $nbvalid * 100 / $uploads );
$self->log( "new=$uploads, not in mageia=$nbvalid, mageia coverage=$percent%" );
}
1;
lib/App/Magpie/Action/Recent.pm view on Meta::CPAN
=head2 run
$recent->run;
Print the list of Perl modules with recently uploaded to PAUSE and not
yet available in Mageia.
=head1 AUTHOR
Jerome Quelin <jquelin@gmail.com>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/ManiacDownloader.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-ManiacDownloader>
=item *
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MatrixClient.pm view on Meta::CPAN
=head1 EMITTED SIGNALS
* start()
do_upload( file => $file, content_type => $type )
do_get_displayname( ?$user_id ) => $displayname
do_set_displayname( $displayname )
do_set_presence( $state, ?$msg )
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MatrixTool/Command/client.pm view on Meta::CPAN
$ matrixtool client login USER-ID
See also L<App::MatrixTool::Command::client::login>.
=head2 upload
Upload a file to the media repository
$ matrixtool client upload FILE [TYPE]
See also L<App::MatrixTool::Command::client::upload>.
=cut
sub run
{
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MechaCPAN.pm view on Meta::CPAN
=over
=item 1. Confirm the shape of CHECKSUMS
C<CHECKSUMS> files contain all the files and the file checksums for a CPAN author's uploads. This file is compared against a rigid definition to ensure that it does not appear to be doing anything malicious.
=item 2. Confirm the signature of CHECKSUMS
Once the C<CHECKSUMS> structure has been examined, the embedded signature is verified. The C<CHECKSUMS> file is signed using the PAUSE Batch Signing Key (C<2E66 557A B97C 19C7 91AF 8E20 328D A867 450F 89EC>, accessible at L<https://www.cpan.org/modu...
view all matches for this distribution
view release on metacpan or search on metacpan
Makefile.PL view on Meta::CPAN
push @postamble, <<"MAKE_FRAGMENT" if supported_platform();
ALL_PM := \$(shell find lib -name "*.pm")
ALL_EXE := script/mediapi
.PHONY: distupload cover critic rawcritic tidy spelling alltest clean clean_coverdb pod2html exe
distupload: distcheck disttest
\t\$(MAKE) tardist
\tcpan-upload --directory Dist-Setup \$(DISTVNAME).tar\$(SUFFIX)
cover:
\tcover -test
critic: export EXTENDED_TESTING = 1
view all matches for this distribution
view release on metacpan or search on metacpan
commit faf0db1c8c0216b74ea325a920ae4412a527abce
Author: Matthew Astley <beeep$mca@t8o.org>
Date: Mon Oct 10 23:31:56 2011 +0100
uploading.
fix .gitignore
commit 2577a686a03eaf1a78e6cd9ffd73b2a13531372c
Author: Matthew Astley <beeep$mca@t8o.org>
view all matches for this distribution
view release on metacpan or search on metacpan
bin/metacpan_notify.pl view on Meta::CPAN
metacpan_notify.pl
=head1 DESCRIPTION
Script displays notifications about modules recently uploaded on CPAN
=head1 ACKNOWLEGEMENTS
I borrowed idea from metacpan-growler.pl script by Hideaki Ohno.
See https://github.com/hideo55/metacpan-growler.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Mimosa/Controller/Root.pm view on Meta::CPAN
# If we accepted a POSTed sequence as input, it will be HTML encoded
my $sequence = decode_entities($c->req->param('sequence'));
# if the user specified a file as their sequence input, read it in
if( $c->req->param('sequence_input_file') ) {
my ($upload) = $c->req->upload('sequence_input_file');
$sequence = $upload->slurp if $upload;
}
# if there is no defline, create one
unless ($sequence =~ m/^>/) {
$sequence = ">web user sequence\n$sequence";
lib/App/Mimosa/Controller/Root.pm view on Meta::CPAN
sub make_job_id :Private {
my ( $self, $c ) = @_;
my $sha1 = sha1_hex freeze {
params => $c->req->parameters,
uploads => $c->req->uploads,
#TODO: add the user - user => $c->user,
};
my $rs = $c->model('BCS')->resultset('Mimosa::Job');
my $jobs = $rs->search( { sha1 => $sha1 } );
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Module/Lister.pm view on Meta::CPAN
# run the .pm file
prompt> perl Lister.pm
---OR---
# rename this file to something your webserver will treat as a
# CGI script and upload it. Run it to see the module list
prompt> cp Lister.pm lister.cgi
... modify the shebang line if you must
prompt> ftp www.example.com
... upload file
prompt> wget http://www.example.com/cgi-bin/lister.cgi
=head1 DESCRIPTION
This is a program to list all of the Perl modules it finds in C<@INC>
for a no-shell web hosting account. It has these explicit design goals:
=over 4
=item * Is a single file FTP upload such that it's ready to run (no archives)
=item * Runs as a CGI script
=item * Runs on a standard Perl 5.004 system with no non-core modules
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/ModuleBuildTiny.pm view on Meta::CPAN
push @args, map {; '-I', rel2abs($_) } @inc;
push @args, 't' if -e 't';
push @args, extra_tests();
return $dist->run(commands => [ [ 'prove', '-br', @args ] ], build => 1, verbose => 1);
},
upload => sub {
my @arguments = @_;
my $config = get_config;
my %opts = $config->{auto_git} ? (tag => 1, push => '') : ();
GetOptionsFromArray(\@arguments, \%opts, qw/trial config=s silent tag! push:s nopush|no-push/) or return 2;
insert_options(\%opts, get_config);
lib/App/ModuleBuildTiny.pm view on Meta::CPAN
my $sure = prompt_yn('Do you want to continue the release process?', !!0);
if ($sure) {
my $file = $dist->write_tarball($dist->archivename);
require CPAN::Upload::Tiny;
CPAN::Upload::Tiny->VERSION('0.009');
my $uploader = CPAN::Upload::Tiny->new_from_config_or_stdin($opts{config});
$uploader->upload_file($file);
print "Successfully uploaded $file\n" if not $opts{silent};
if ($opts{tag}) {
require Git::Wrapper;
my $git = Git::Wrapper->new('.');
my $version = 'v' . $dist->version;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MojoSlides/files/public/bootstrap.min.css view on Meta::CPAN
* Copyright 2013 Twitter, Inc
* Licensed under the Apache License v2.0
* http://www.apache.org/licenses/LICENSE-2.0
*
* Designed and built with all the love in the world by @mdo and @fat.
*//*! normalize.css v2.1.0 | MIT License | git.io/normalize */article,aside,details,figcaption,figure,footer,header,hgroup,main,nav,section,summary{display:block}audio,canvas,video{display:inline-block}audio:not([controls]){display:none;height:0}[hi...
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/MtAws.pm view on Meta::CPAN
require App::MtAws::Command::Sync;
check_module_versions;
App::MtAws::Command::Sync::run($options, $j);
} elsif ($action eq 'upload-file') {
defined(my $relfilename = $options->{relfilename})||confess;
my $partsize = delete $options->{partsize};
my $j = App::MtAws::Journal->new(%journal_opts, journal_file => $options->{journal});
lib/App/MtAws.pm view on Meta::CPAN
if (defined $j->{journal_h}->{$relfilename});
## use Test::Tabs
if ($options->{'data-type'} ne 'filename') {
binmode STDIN;
check_stdin_not_empty(); # after we fork, but before we touch Journal for write and create Amazon Glacier upload id
}
$j->open_for_write();
my $ft = ($options->{'data-type'} eq 'filename') ?
App::MtAws::QueueJob::Upload->new(
filename => $options->{filename}, relfilename => $relfilename,
partsize => ONE_MB*$partsize, delete_after_upload => 0) :
App::MtAws::QueueJob::Upload->new(
stdin => 1, relfilename => $relfilename,
partsize => ONE_MB*$partsize, delete_after_upload => 0);
my ($R) = fork_engine->{parent_worker}->process_task($ft, $j);
die unless $R;
$j->close_for_write();
}
lib/App/MtAws.pm view on Meta::CPAN
--dir - source local directory
--vault - Glacier vault name
--concurrency - number of parallel workers to run
--max-number-of-files - max number of files to sync/restore
--protocol - Use http or https to connect to Glacier
--partsize - Glacier multipart upload part size
--filter --include --exclude - File filtering
--dry-run - Don't do anything
--token - to be used with STS/IAM
--timeout - socket timeout
Commands:
lib/App/MtAws.pm view on Meta::CPAN
--request-inventory-format - json or csv
download-inventory
--new-journal - Write inventory as new journal
create-vault VAULT-NAME
delete-vault VAULT-NAME
upload-file
--filename - File to upload
--set-rel-filename - Relative filename to use in Journal (if dir not specified)
--stdin - Upload from STDIN
--check-max-file-size - Specify to ensure there will be less than 10 000 parts
list-vaults
--format for-humans|mtmsg
lib/App/MtAws.pm view on Meta::CPAN
}
}
sub check_stdin_not_empty
{
die "Empty input from STDIN - cannot upload empty archive"
if eof(STDIN); # we block until first byte arrive, then we put it back in to buffer
}
1;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ChordPro/res/examples/mollymalone.cho view on Meta::CPAN
"G"G>GG|"Em"G/B/-BG|"Am"A>AA|"D7"A/c/-cA/A/|"G"G/d/-dc|"Em"B/d/-d c|"A7"B>G"D7"A|"G"G2z |]
w: live, a-live O!_* A-live a-live O!_* Cry-ing âCock-les* and Mus-sels* a-live a-live-O!â
{end_of_abc}
# An illustrative image from the net, in the bottom right corner of the page.
{image anchor="page" x="100%" y="100%" scale="80%" src="https://upload.wikimedia.org/wikipedia/commons/thumb/9/91/Dublin_-_Molly_Malone.jpg/330px-Dublin_-_Molly_Malone.jpg"}
# First verse of the song, with chords.
{start_of_verse}
She [G]was a fish [Em]monger
but [Am]sure, 'twas no [D7]wonder
For [G]so were her [Em]father and [A7]mother be[D7]fore
view all matches for this distribution
view release on metacpan or search on metacpan
public/javascripts/ace/mode-nginx.js view on Meta::CPAN
"use strict";
var oop = require("../lib/oop");
var TextHighlightRules = require("./text_highlight_rules").TextHighlightRules;
var NginxHighlightRules = function () {
var keywords = "include|index|absolute_redirect|aio|output_buffers|directio|sendfile|aio_write|alias|root|chunked_transfer_encoding|client_body_buffer_size|client_body_in_file_only|client_body_in_single_buffer|client_body_temp_path|client_body_ti...
this.$rules = {
"start": [{
token: ["storage.type", "text", "string.regexp", "paren.lparen"],
regex: "\\b(location)(\\s+)([\\^]?~[\\*]?\\s+.*?)({)"
view all matches for this distribution
view release on metacpan or search on metacpan
2.095001 - 2025-11-15
[BUG FIXES]
* upload netdisco-postgresql-13 to container repositories
2.095000 - 2025-11-15
[NEW FEATURES]
view all matches for this distribution
view release on metacpan or search on metacpan
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
-- the tftp group
-- Implementation of the tftp group is current for all Cisco Workgroup
-- Stack products which implement tftp upload/download functions.
tftpHost OBJECT-TYPE
SYNTAX DisplayString (SIZE (0..64))
MAX-ACCESS read-write
STATUS current
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
tftpAction OBJECT-TYPE
SYNTAX INTEGER {
other(1), -- none of the following
downloadConfig(2),
uploadConfig(3),
downloadSw(4),
uploadSw(5),
downloadFw(6),
uploadFw(7)
}
MAX-ACCESS read-write
STATUS current
DESCRIPTION "Setting this object to one of the acceptable
values initiates the requested action using the
information given in tftpHost, tftpFile,
tftpModule.
downloadConfig(2): receive configuration from
host/file
uploadConfig(3) : send configuration to
host/file
downloadSw(4) : receive software image from
host/file
uploadSw(5) : send software image to
host/file
downloadFw(6) : receive firmware image from
host/file
uploadFw(7) : send firmware image to
host/file
Setting this object to any other value results in
an error."
::= { tftpGrp 4 }
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
-- the fileCopy group
-- Implementation of the file group is current for all Cisco Workgroup
-- Stack products which implement tftp/rcp upload/download functions
-- or local file copy.
fileCopyProtocol OBJECT-TYPE
SYNTAX INTEGER { tftp (1),
rcp (2)
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about
the authentication features."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
::= { ciscoStackMIBCompliances 1 }
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about
the authentication features."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about
the combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about the
authentication features."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about the
authentication features."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about the
extended RMON feature."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
port capabilities on the device."
GROUP fileCopyGroup2
DESCRIPTION "The fileCopyGroup2 is an optional group
containing objects providing additional
information about tftp/rcp or local file
upload/download features."
GROUP systemRmonGroup2
DESCRIPTION "The systemRmonGroup2 is an optional group
containing objects providing information about
RMON max memory usage control."
GROUP filterGroup2
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about the
extended RMON feature."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
port capabilities on the device."
GROUP fileCopyGroup2
DESCRIPTION "The fileCopyGroup2 is an optional group
containing objects providing additional
information about tftp/rcp or local file
upload/download features."
GROUP systemRmonGroup2
DESCRIPTION "The systemRmonGroup2 is an optional group
containing objects providing information about
RMON max memory usage control."
GROUP filterGroup2
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about the
extended RMON feature."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
port capabilities on the device."
GROUP fileCopyGroup2
DESCRIPTION "The fileCopyGroup2 is an optional group
containing objects providing additional
information about tftp/rcp or local file
upload/download features."
GROUP systemRmonGroup2
DESCRIPTION "The systemRmonGroup2 is an optional group
containing objects providing information about
RMON max memory usage control."
GROUP filterGroup2
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
containing objects providing information about the
extended RMON feature."
GROUP tftpGroup
DESCRIPTION "The tftpGroup is an optional group containing
objects providing information about the tftp
upload/download features."
GROUP brouteEnableGroup
DESCRIPTION "The brouteEnableGroup is an optional group
containing objects providing information about the
combined bridging/routing feature."
GROUP filterGroup
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
information for supporting port security feature
with the multiple secured source MAC addresses."
GROUP fileCopyGroup
DESCRIPTION "The fileCopyGroup is an optional group containing
objects providing information about the tftp/rcp
or local file upload/download features."
GROUP optionalSystemMiscGroup1
DESCRIPTION "The optionalSystemMiscGroup1 is an optional group
containing objects providing information about the
miscellaneous system features."
GROUP ipPermitGroup1
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
port capabilities on the device."
GROUP fileCopyGroup2
DESCRIPTION "The fileCopyGroup2 is an optional group
containing objects providing additional
information about tftp/rcp or local file
upload/download features."
GROUP systemRmonGroup2
DESCRIPTION "The systemRmonGroup2 is an optional group
containing objects providing information about
RMON max memory usage control."
GROUP filterGroup2
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
tftpAction,
tftpResult
}
STATUS current
DESCRIPTION "A collection of objects providing information
about the tftp upload/download features.
Implementation of this group is optional. If the
tftp upload/download features are supported, the
entire group should be implemented."
::= { ciscoStackMIBGroups 15 }
brouteEnableGroup OBJECT-GROUP
OBJECTS {
brouterPortModule,
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
fileCopyResult,
fileCopyResultRcpErrorMessage
}
STATUS current
DESCRIPTION "A collection of objects providing information
about the tftp/rcp or local file upload/download
features.
Implementation of this group is optional. If the
tftp upload/download features are supported, the
entire group should be implemented."
::= { ciscoStackMIBGroups 34 }
optionalSystemMiscGroup1 OBJECT-GROUP
OBJECTS {
share/mib/CISCO-STACK-MIB.my view on Meta::CPAN
fileCopyGroup2 OBJECT-GROUP
OBJECTS { fileCopyRuntimeConfigPart }
STATUS current
DESCRIPTION "A collection of objects providing additional
information about tftp/rcp or local file
upload/download features.
Implementation of this group is optional."
::= { ciscoStackMIBGroups 55 }
systemRmonGroup2 OBJECT-GROUP
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Nopaste/Service.pm view on Meta::CPAN
sub uri { "http://paste.scsys.co.uk/" }
=head1 DESCRIPTION
C<App::Nopaste::Service> defines a generic interface for uploading to nopaste
sites. It provides a default interface to that of the POE Pastebot.
=head1 METHODS
=head2 nopaste
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Notifier/Client.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-Notifier-Client>
=item *
view all matches for this distribution
view release on metacpan or search on metacpan
=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-Notifier-Service>
=item *
view all matches for this distribution
view release on metacpan or search on metacpan
httpd/cgi-bin/test.untaint.cgi view on Meta::CPAN
(
input_layer => '',
path => $dir_name,
);
my($handler) = CGI::Untaint -> new(map{ $_ => $cgi -> param($_) } $cgi -> param);
my($file) = $handler -> extract(-as_upload => 'name');
my($param) =
{
filename => $$file{filename},
payload => $$file{payload},
};
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Office/Contacts/Import/vCards/Controller/Import.pm view on Meta::CPAN
}
# Build some of the progress report.
# Note: This report, @progress, is not actually output.
my($fh) = $self -> query -> upload($field_name);
my($mime_type) = ${$self -> query -> uploadInfo($vfile_name)}{'Content-Type'};
my(@progress);
push @progress, "file_name => $vfile_name";
push @progress, 'file_size => ' . (-s $fh);
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Office/Contacts/Util/Validator.pm view on Meta::CPAN
} # End of update_person.
# --------------------------------------------------
sub validate_upload
{
my($self) = @_;
$self -> app -> log(debug => 'Util::Validator.validate_upload()');
my($verifier) = Data::Verifier -> new
(
filters => [qw(trim)],
profile =>
lib/App/Office/Contacts/Util/Validator.pm view on Meta::CPAN
$self -> log_result($result);
return $result;
} # End of validate_upload.
# --------------------------------------------------
sub validate_organization_id
{
lib/App/Office/Contacts/Util/Validator.pm view on Meta::CPAN
=head2 validate_person_id()
Validates just the person_id and the sid (See L<App::Office::Contacts::Controller::Exporter::Person>).
=head2 validate_upload()
Validates CGI form parameters when uploading a file (see L<App::Office::Contacts::Import::vCards>).
=head1 FAQ
See L<App::Office::Contacts/FAQ>.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/App/Oozie/Deploy.pm view on Meta::CPAN
use MooX::Options prefer_commandline => 0,
protect_argv => 0,
usage_string => <<'USAGE',
Usage: %c %o
Deploys workflows to HDFS. Specifying names as final arguments will upload only those
USAGE
;
use App::Oozie::Deploy::Template;
use App::Oozie::Deploy::Validate::Spec;
lib/App/Oozie/Deploy.pm view on Meta::CPAN
if (!$self->secure_cluster) {
# Left in place for historial reasons.
# All clusters should be under Kerberos.
# Possible removal in a future version.
#
# unsafe, but needed when uploading with mapred's uid or hdfs dfs cannot see the files
chmod oct( DEFAULT_FILE_MODE ), $config->{base_dest};
}
my $success = $self->upload_to_hdfs;
$self->maybe_update_coordinators( $update_coord ) if @{ $update_coord };
if ($self->prune) {
$logger->info( '--prune is set, checking workflow directories for old files' );
lib/App/Oozie/Deploy.pm view on Meta::CPAN
);
}
}
push @secondLevelWorkflows, @subs;
# When deploying a wf/coord, it makes no sense to upload what we have in parent,
# otherwise, yes, we'll need to update bundle.xml along with any other file on it
if (! -f $bundleFileLocationGuess) {
splice @firstLevelWorkflows, $i, 1;
$i--;
}
lib/App/Oozie/Deploy.pm view on Meta::CPAN
}
return ($total_files == $deleted_files);
}
sub upload_to_hdfs {
my $self = shift;
my $config = $self->internal_conf;
if ( $self->dryrun ) {
$self->logger->warn(
sprintf 'Skipping upload to HDFS as dryrun was set. Would have uploaded from %s to %s',
$config->{base_dest},
$config->{hdfs_dest},
);
return 1;
}
lib/App/Oozie/Deploy.pm view on Meta::CPAN
=head2 prune_path
=head2 run
=head2 upload_to_hdfs
=head2 validate_meta_file
=head2 verify_temp_dir
view all matches for this distribution
view release on metacpan or search on metacpan
0.11 2022/11/20
Update the POD
0.12 2022/11/21
Resolve a CPAN uploading conflict
0.13 2022/12/10
Updates the POD
view all matches for this distribution
view release on metacpan or search on metacpan
script/comaint view on Meta::CPAN
that cache.
=item *
Your PAUSE credentials have to be saved in C<~/.pause> file, the same
as the one used by CPAN uploader.
=back
=head1 AUTHOR
view all matches for this distribution
view release on metacpan or search on metacpan
To locally install a new release for testing:
```
dzil install
```
To upload a new release:
```
dzil release
```
To manually override the release version e.g. for a major/minor version bump:
view all matches for this distribution
view release on metacpan or search on metacpan
bin/pft-make view on Meta::CPAN
open($fh, ">:encoding($enc)", $temp) or croak "Opening $temp: $!";
print $fh $data;
close $fh;
if (-e "$path") {
# This branch enables an upload-time optimization: if the file
# created file is exactly the same as the previous compilation (same
# checksum) we keep the old one. Rsync will not upload it again.
my $md5 = Digest::MD5->new;
$md5->add(encode($enc, $data));
my $digest_new = $md5->hexdigest;
open($fh, "<:raw", $path)
view all matches for this distribution