App-cdnget
view release on metacpan or search on metacpan
}
},
"configure" : {
"requires" : {
"ExtUtils::MakeMaker" : "0"
}
},
"runtime" : {
"requires" : {
"CSS::Minifier::XS" : "0.09",
"DateTime" : "1.42",
"Digest::MD5" : "2.55",
"FCGI" : "0.78",
"GD" : "2.56",
"JavaScript::Minifier::XS" : "0.11",
"LWP::UserAgent" : "6.15",
"Lazy::Utils" : "1.08",
"Object::Base" : "1.11",
"SUPER" : "1.16",
"Thread::Semaphore" : "2.13",
"Time::HiRes" : "1.9740",
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
version: '1.4'
name: App-cdnget
no_index:
directory:
- t
- inc
requires:
CSS::Minifier::XS: '0.09'
DateTime: '1.42'
Digest::MD5: '2.55'
FCGI: '0.78'
GD: '2.56'
JavaScript::Minifier::XS: '0.11'
LWP::UserAgent: '6.15'
Lazy::Utils: '1.08'
Object::Base: '1.11'
SUPER: '1.16'
Thread::Semaphore: '2.13'
Time::HiRes: '1.9740'
Makefile.PL view on Meta::CPAN
NAME => 'App::cdnget',
VERSION_FROM => 'lib/App/cdnget.pm',
MIN_PERL_VERSION => '5.014',
PREREQ_PM => {
'threads' => '1.72',
'threads::shared' => '1.28',
'forks' => '0.29',
'SUPER' => '1.16',
'Thread::Semaphore' => '2.13',
'Time::HiRes' => '1.9740',
'DateTime' => '1.42',
'FCGI' => '0.78',
'Digest::MD5' => '2.55',
'LWP::UserAgent' => '6.15',
'GD' => '2.56',
'CSS::Minifier::XS' => '0.09',
'JavaScript::Minifier::XS' => '0.11',
'Lazy::Utils' => '1.08',
'Object::Base' => '1.11',
},
EXE_FILES => [qw(
* threads::shared
* forks
* SUPER
* Thread::Semaphore
* Time::HiRes
* DateTime
* FCGI
* Digest::SHA
* LWP::UserAgent
* GD
* Lazy::Utils
# DEPENDENCIES
This module requires these other modules and libraries:
- threads
- threads::shared
- forks
- SUPER
- Thread::Semaphore
- Time::HiRes
- DateTime
- FCGI
- Digest::SHA
- LWP::UserAgent
- GD
- Lazy::Utils
- Object::Base
# REPOSITORY
**GitHub** [https://github.com/orkunkaraduman/p5-cdnget](https://github.com/orkunkaraduman/p5-cdnget)
lib/App/cdnget.pm view on Meta::CPAN
forks->import();
require forks::shared;
forks::shared->import();
}
}
use strict;
use warnings;
use v5.14;
use utf8;
use Time::HiRes qw(sleep usleep);
use DateTime;
use Lazy::Utils;
use App::cdnget::Exception;
use App::cdnget::Worker;
use App::cdnget::Downloader;
BEGIN
{
require Exporter;
lib/App/cdnget.pm view on Meta::CPAN
our $CHUNK_SIZE = 256*1024;
my $terminating :shared = 0;
my $terminating_force :shared = 0;
sub log_info
{
my ($msg) = @_;
$msg = "Unknown" unless $msg;
my $dts = DateTime->now(time_zone => POSIX::strftime("%z", localtime), locale => "en")->strftime('%x %T %z');
$msg = "[$dts] $msg";
say $msg;
}
sub main
{
log_info "Starting p5-cdnget/${App::cdnget::VERSION}";
eval
{
my $cmdargs = commandArgs({ valuableArgs => 1, noCommand => 1 }, @_);
lib/App/cdnget.pm view on Meta::CPAN
=item *
Thread::Semaphore
=item *
Time::HiRes
=item *
DateTime
=item *
FCGI
=item *
Digest::SHA
=item *
lib/App/cdnget/Exception.pm view on Meta::CPAN
package App::cdnget::Exception;
use Object::Base qw(Object::Exception);
use v5.14;
use bytes;
use DateTime;
BEGIN
{
our $VERSION = '0.03';
}
sub msg :lvalue
{
my $self = shift;
my ($msg) = @_;
my @args = @_;
if (@args >= 1 and not ref($msg))
{
$msg = "Unknown" unless $msg;
my $dts = DateTime->now(time_zone => POSIX::strftime("%z", localtime), locale => "en")->strftime('%x %T %z');
$msg = "[$dts] $msg";
$args[0] = $msg;
}
$self->SUPER::msg(@args);
}
1;
__END__
=head1 REPOSITORY
( run in 0.389 second using v1.01-cache-2.11-cpan-05444aca049 )