view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
b) Requiring preservation of specified reasonable legal notices or
author attributions in that material or in the Appropriate Legal
Notices displayed by works containing it; or
c) Prohibiting misrepresentation of the origin of that material, or
requiring that modified versions of such material be marked in
reasonable ways as different from the original version; or
d) Limiting the use for publicity purposes of names of licensors or
authors of the material; or
e) Declining to grant rights under trademark law for use of some
covered work, you indicate your acceptance of this License to do so.
10. Automatic Licensing of Downstream Recipients.
Each time you convey a covered work, the recipient automatically
receives a license from the original licensors, to run, modify and
propagate that work, subject to this License. You are not responsible
for enforcing compliance by third parties with this License.
An "entity transaction" is a transaction transferring control of an
organization, or substantially all assets of one, or subdividing an
view all matches for this distribution
view release on metacpan or search on metacpan
lib/API/ParallelsWPB/Response.pm view on Meta::CPAN
$res - HTTP::Response object.
=head2 B<json($self)>
Returns original JSON answer.
=head2 B<success($self)>
Returns 1 if request succeeded, 0 otherwise.
view all matches for this distribution
view release on metacpan or search on metacpan
Permissions for Redistribution of the Standard Version
(2) You may Distribute verbatim copies of the Source form of the
Standard Version of this Package in any medium without restriction,
either gratis or for a Distributor Fee, provided that you duplicate
all of the original copyright notices and associated disclaimers. At
your discretion, such verbatim copies may or may not include a
Compiled form of the Package.
(3) You may apply any bug fixes, portability changes, and other
modifications made available from the Copyright Holder. The resulting
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
0.02 2015-03-16T02:35:36Z
- Add a status_code parameter to P::MW::AS::RequestValidator
0.01 2015-02-18T10:41:05Z
- original version
view all matches for this distribution
view release on metacpan or search on metacpan
- fix test case
0.01 2014-01-04T06:04:48Z
- original version
view all matches for this distribution
view release on metacpan or search on metacpan
inc/Module/Install/Repository.pm view on Meta::CPAN
sub _find_repo {
my ($execute) = @_;
if (-e ".git") {
# TODO support remote besides 'origin'?
if ($execute->('git remote show -n origin') =~ /URL: (.*)$/m) {
# XXX Make it public clone URL, but this only works with github
my $git_url = $1;
$git_url =~ s![\w\-]+\@([^:]+):!git://$1/!;
return $git_url;
} elsif ($execute->('git svn info') =~ /URL: (.*)$/m) {
view all matches for this distribution
view release on metacpan or search on metacpan
inc/MyBuilder.pm view on Meta::CPAN
my $info = `svn info .`;
return $1 if $info =~ /^URL:\s+(.+)$/m;
}
elsif ( -d '.git' ) {
my $info = `git remote -v`;
return unless $info =~ /^origin\s+(.+)$/m;
my $url = $1;
# Special case: patch up github URLs
$url =~ s!^git\@github\.com:!git://github.com/!;
return $url;
}
view all matches for this distribution
view release on metacpan or search on metacpan
from command line
- documentation
- structured internal variable access
0.01 Tue Dec 9 16:46:42 2003
- original version; created by h2xs 1.22 with options
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
Revision history for Perl extension ARGV-JSON
0.01 2013-12-18T01:23:44Z
- original version
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ARSObject.pod view on Meta::CPAN
=head2 2010-08-25
C<strOut>() method may return original enum value when cannot translate it.
C<vfstore>()/C<vfload>() extended with '-slotName-storable' switch.
=head2 2010-08-20
view all matches for this distribution
view release on metacpan or search on metacpan
example/ars_SetServerInfo.pl view on Meta::CPAN
my %il = ars_GetServerInfo($c,
&ARS::AR_SERVER_INFO_EMAIL_FROM);
print "\tEMAIL_FROM = $il{'EMAIL_FROM'}\n\n";
print "Setting EMAIL_FROM to original setting..\n";
ars_SetServerInfo($c,
&ARS::AR_SERVER_INFO_EMAIL_FROM,
$orig) ||
die "ars_SetServerInfo: $ars_errstr\n";
view all matches for this distribution
view release on metacpan or search on metacpan
applications/sbin/sshWrapperASNMTAP.pl view on Meta::CPAN
# Unset the path, so all commands must have the full path. This avoids any path attacks.
delete $ENV{PATH};
unless ( defined $command ) {
# Since this script is called as a forced command, need to get the original ssh command given by the client.
my $commandSSH = $ENV{SSH_ORIGINAL_COMMAND};
unless ( defined $commandSSH ) {
print SSHOUT ("$now environment variable SSH_ORIGINAL_COMMAND not set\n\n"); close (SSHOUT);
print STDERR "$denyString\n"; exit 0;
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ASP4/ConfigNode/Web.pm view on Meta::CPAN
sub _parse_routes
{
my $s = shift;
my @original = @{ $s->{routes} };
my $app_root = $s->application_root;
@{ $s->{routes} } = map {
$_->{include_routes} ? do {
my $item = $_;
$item->{include_routes} =~ s/\@ServerRoot\@/$app_root/sg;
lib/ASP4/ConfigNode/Web.pm view on Meta::CPAN
or confess "Error parsing '$item->{include_routes}': $@";
ref($json) eq 'ARRAY'
or confess "File '$item->{include_routes}' should be an arrayref but it's a '@{[ ref($json) ]}' instead.";
@$json;
} : $_
} @original;
my $router = Router::Generic->new();
map { $router->add_route( %$_ ) } @{ $s->{routes} };
$s->{router} = $router;
}# end _parse_routes()
view all matches for this distribution
view release on metacpan or search on metacpan
lib/ASP4x/Linker.pm view on Meta::CPAN
Returns the uri for all widgets based on the intersect of:
=over 4
=item * The incoming form data from the original request
=item * Individually-set values for each widget in the collection.
=item * Any properties provided as an argument to C<uri()>.
lib/ASP4x/Linker.pm view on Meta::CPAN
'artists.sort' => 'desc',
};
=head2 reset( )
Resets all widgets to their original values from the original request (as specified in the C<base_href> value used by C<new()>).
=head1 SEE ALSO
L<ASP4>, L<ASP4x::Router>, L<Router::Generic>
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AVLTree.pm view on Meta::CPAN
The nodes of an AVL tree object can hold any kind of item, as long as each
one of these can be used or has an element that can be use to define a partial order
on the set of possible items. This is specified by providing, upon tree construction,
a reference to a function for comparing any two of the possible items.
The underlying C library is a reinterpretation of the C library originally
developed by Julienne Walker L<http://www.eternallyconfuzzled.com/jsw_home.aspx>.
This library has been adapted for dealing directly with Perl (SV) variables.
The module at the moment is in beta stage but it is usable. It provides methods
for creating and querying an AVL tree, get its size and insert and remove elements
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
- Fix handling named profiles (#2) @jjatria
0.01 2014-12-23T02:28:46Z
- original version
view all matches for this distribution
view release on metacpan or search on metacpan
lib/AWS/CloudFront.pm view on Meta::CPAN
my $response = $s->request( $type, %args )->request();
my $xpc = $response->xpc;
if( my ($node) = $xpc->findnodes('.//cf:Distribution') )
{
my $origin;
if( my ($origin_s3) = $xpc->findnodes('.//cf:S3Origin', $node) )
{
$origin = AWS::CloudFront::S3Origin->new(
OriginAccessIdentity => $xpc->findvalue('.//cf:OriginAccessIdentity', $origin_s3),
DNSName => $xpc->findvalue('.//cf:DNSName', $origin_s3),
);
}
elsif( my $origin_custom = $xpc->findnode('.//cf:CustomOrigin', $node) )
{
}# end if()
my $dist = AWS::CloudFront::Distribution->new(
cf => $s,
lib/AWS/CloudFront.pm view on Meta::CPAN
DefaultRootObject => $xpc->findvalue('.//cf:DefaultRootObject') || undef,
CNAME => $xpc->findvalue('.//cf:CNAME') || undef,
InProgressValidationBatches => $xpc->findvalue('.//cf:InProgressValidationBatches') || undef,
Comment => $xpc->findvalue('.//cf:Comment') || undef,
CallerReference => $xpc->findvalue('.//cf:CallerReference') || undef,
Origin => $origin,
# TODO: Logging, ActiveTrustedSigners.
);
return $dist;
}# end if()
}# end distribution()
lib/AWS/CloudFront.pm view on Meta::CPAN
my $response = $s->request( $type, %args )->request();
my $xpc = $response->xpc;
if( my ($node) = $xpc->findnodes('.//cf:Distribution') )
{
my $origin;
if( my ($origin_s3) = $xpc->findnodes('.//cf:S3Origin', $node) )
{
$origin = AWS::CloudFront::S3Origin->new(
OriginAccessIdentity => $xpc->findvalue('.//cf:OriginAccessIdentity', $origin_s3),
DNSName => $xpc->findvalue('.//cf:DNSName', $origin_s3),
);
}
elsif( my $origin_custom = $xpc->findnode('.//cf:CustomOrigin', $node) )
{
}# end if()
my $dist = AWS::CloudFront::Distribution->new(
cf => $s,
lib/AWS/CloudFront.pm view on Meta::CPAN
DefaultRootObject => $xpc->findvalue('.//cf:DefaultRootObject') || undef,
CNAME => $xpc->findvalue('.//cf:CNAME') || undef,
InProgressValidationBatches => $xpc->findvalue('.//cf:InProgressValidationBatches') || undef,
Comment => $xpc->findvalue('.//cf:Comment') || undef,
CallerReference => $xpc->findvalue('.//cf:CallerReference') || undef,
Origin => $origin,
# TODO: Logging, ActiveTrustedSigners.
);
return $dist;
}# end if()
}# end add_distribution()
lib/AWS/CloudFront.pm view on Meta::CPAN
my $xpc = $response->xpc;
my @dists = ( );
foreach my $node ( $xpc->findnodes('.//cf:DistributionSummary') )
{
my $origin;
if( my ($origin_s3) = $xpc->findnodes('.//cf:S3Origin', $node) )
{
$origin = AWS::CloudFront::S3Origin->new(
OriginAccessIdentity => $xpc->findvalue('.//cf:OriginAccessIdentity', $origin_s3),
DNSName => $xpc->findvalue('.//cf:DNSName', $origin_s3),
);
}
elsif( my $origin_custom = $xpc->findnode('.//cf:CustomOrigin', $node) )
{
# TODO
}# end if()
my $dist = AWS::CloudFront::Distribution->new(
cf => $s,
lib/AWS/CloudFront.pm view on Meta::CPAN
DefaultRootObject => $xpc->findvalue('.//cf:DefaultRootObject') || undef,
CNAME => $xpc->findvalue('.//cf:CNAME') || undef,
InProgressValidationBatches => $xpc->findvalue('.//cf:InProgressValidationBatches') || undef,
Comment => $xpc->findvalue('.//cf:Comment') || undef,
CallerReference => $xpc->findvalue('.//cf:CallerReference') || undef,
Origin => $origin,
# TODO: Logging, ActiveTrustedSigners.
);
push @dists, $dist;
}# end foreach()
return @dists;
}# end distributions()
sub origin_access_identities
{
my ($s, %args) = @_;
my @out = ( );
FETCH: {
lib/AWS/CloudFront.pm view on Meta::CPAN
my $xpc = $response->xpc;
foreach my $node ( $xpc->findnodes('.//cf:CloudFrontOriginAccessIdentitySummary') )
{
my ($config) = $xpc->findnodes('.//cf:CloudFrontOriginAccessIdentityConfig');
my $ident = $s->origin_access_identity( $xpc->findvalue('.//cf:Id', $node) );
push @out, $ident;
}# end foreach()
if( $xpc->findvalue('.//cf:IsTruncated') eq 'true' )
{
$args{Marker} = $xpc->findvalue('.//cf:NextMarker');
next FETCH;
}# end if()
};
return @out;
}# end origin_access_identities()
sub origin_access_identity
{
my ($s, $id) = @_;
my $response = $s->request( 'GetOriginAccessIdentity', Id => $id )->request();
my $xpc = $response->xpc;
lib/AWS/CloudFront.pm view on Meta::CPAN
Id => $xpc->findvalue('.//cf:Id'),
S3CanonicalUserId => $xpc->findvalue('.//cf:S3CanonicalUserId'),
CallerReference => $xpc->findvalue('.//cf:CallerReference'),
Comment => $xpc->findvalue('.//cf:Comment'),
);
}# end origin_access_identity()
1;# return true:
=pod
view all matches for this distribution
view release on metacpan or search on metacpan
distribute and/or modify the software.
Also, for each author's protection and ours, we want to make certain
that everyone understands that there is no warranty for this free
software. If the software is modified by someone else and passed on, we
want its recipients to know that what they have is not the original, so
that any problems introduced by others will not reflect on the original
authors' reputations.
The precise terms and conditions for copying, distribution and
modification follow.
5. By copying, distributing or modifying the Program (or any work based
on the Program) you indicate your acceptance of this license to do so,
and all its terms and conditions.
6. Each time you redistribute the Program (or any work based on the
Program), the recipient automatically receives a license from the original
licensor to copy, distribute or modify the Program subject to these
terms and conditions. You may not impose any further restrictions on the
recipients' exercise of the rights granted herein.
7. The Free Software Foundation may publish revised and/or new versions
recipients of the item may redistribute it under the same conditions they
received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
duplicate all of the original copyright notices and associated disclaimers.
2. You may apply bug fixes, portability fixes and other modifications derived
from the Public Domain or from the Copyright Holder. A Package modified in such
a way shall still be considered the Standard Version.
view all matches for this distribution
view release on metacpan or search on metacpan
CONTRIBUTING.md view on Meta::CPAN
request to the .mailmap file to contain the correct mapping.
[Check here](https://github.com/git/git/blob/master/Documentation/mailmap.txt)
for more information on git's .mailmap files.
This file was generated via Dist::Zilla::Plugin::GenerateFile::FromShareDir 0.014 from a
template file originating in Dist-Zilla-PluginBundle-MAXMIND-0.83.
view all matches for this distribution
view release on metacpan or search on metacpan
author/pod-stripper/scripts/pod_stripper.pl view on Meta::CPAN
sub wanted;
sub dostrip;
sub delete_pod;
my $original_bytes = 0;
my $final_bytes = 0;
use Cwd ();
my $cwd = Cwd::cwd();
author/pod-stripper/scripts/pod_stripper.pl view on Meta::CPAN
}
# Traverse desired filesystems
File::Find::find({wanted => \&wanted}, @dirs);
say "Original module size: $original_bytes";
say "Stripped to: $final_bytes";
say sprintf "Won %0.02f%%", (1- ($final_bytes / $original_bytes)) * 100;
exit;
sub wanted {
my ($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size);
($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size) = lstat($_);
$original_bytes += $size;
if (-f $_ && /^.*\.pm\z/s) {
dostrip($_);
}
author/pod-stripper/scripts/pod_stripper.pl view on Meta::CPAN
# skip it for safety.
if ($module =~ /^__DATA__$/m) {
return
}
# We unlink the original pm
unlink $file;
open my $pm, '>', $file;
$strip->output_fh($pm);
$strip->parse_string_document($module);
view all matches for this distribution