App-Pm2Port

 view release on metacpan or  search on metacpan

META.yml  view on Meta::CPAN

no_index:
  directory:
    - inc
    - t
requires:
  CPANPLUS: 0
  ExtUtils::MakeMaker: 0
  File::Temp: 0
  FreeBSD::Ports::INDEXhash: 0
  Getopt::Long: 0
  JSON::XS: 0
  Term::ReadLine: 0
  YAML: 0
  perl: 5.10.0
  version: 0
resources:
  license: http://dev.perl.org/licenses/
  repository: http://developers.rambler.ru/svn/perlmodules/App-Pm2Port
version: 0.29

Makefile.PL  view on Meta::CPAN

license  'perl';

build_requires 'Test::More';
requires 'YAML';
requires 'version';
requires 'Term::ReadLine';
requires 'ExtUtils::MakeMaker';
requires 'File::Temp';
requires 'Getopt::Long';
requires 'FreeBSD::Ports::INDEXhash';
requires 'JSON::XS';
requires 'CPANPLUS';

install_script glob 'script/*';
auto_install;
repository 'http://developers.rambler.ru/svn/perlmodules/App-Pm2Port';

WriteAll;

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

$ENV{LC_ALL} = 'C';
our $VERSION=0.29;
use 5.010;
use strict;
use warnings;
use ExtUtils::MakeMaker();
use Net::FTP;
use Getopt::Long;
use File::Temp qw(tempdir);
use YAML qw(Dump LoadFile DumpFile);
use JSON::XS;
use version;
use File::Basename qw(dirname);
use CPAN;
use CPANPLUS::Backend;
use Config;
use FreeBSD::Ports::INDEXhash qw/INDEXhash/;

=head2 new

=cut

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

Loads META.yml or META.json

=cut

sub load_meta {
    my $self = shift;
    if ( -e 'META.json' ) {
        open +( my $f ), '<', 'META.json' or die $!;
        local $/ = undef;
        local $\ = undef;
        return JSON::XS::decode_json(<$f>);
    }
    else {
        return LoadFile('META.yml');
    }
}
1;

__END__

=head1 NAME