view release on metacpan or  search on metacpan

lib/CPANPLUS/Dist/Gentoo/Maps.pm  view on Meta::CPAN

  <$fh>;
 };
 s/^\s*//, s/\s*$// for $timestamp;

 my $shift = 0;
 if ($timestamp =~ s/\s+([+-])([0-9]{2})([0-9]{2})$//) {
  $shift = ($2 * 60 + $3) * 60;
  $shift = -$shift if $1 eq '-';
 }

 my $old_lc_all = POSIX::setlocale(POSIX::LC_ALL());
 POSIX::setlocale(POSIX::LC_ALL(), 'C');
 $timestamp = POSIX::mktime(
  POSIX::strptime($timestamp, '%a, %d %b %Y %H:%M:%S')
 );
 POSIX::setlocale(POSIX::LC_ALL(), $old_lc_all);
 $timestamp += $shift;

 return $timestamp;
}

=head2 C<TIMESTAMP>

Numerical timestamp associated with the revision of the portage tree that was used for generating the corrections to the natural cpan-to-gentoo mapping listed in this module.

=cut

lib/CPANPLUS/Dist/Gentoo/Maps.pm  view on Meta::CPAN

Gtk2-Ex-FormFactory     gtk2-ex-formfactory
Gtk2-GladeXML           gtk2-gladexml
Gtk2-Spell              gtk2-spell
Gtk2-TrayIcon           gtk2-trayicon
Gtk2-TrayManager        gtk2-traymanager
Gtk2Fu                  gtk2-fu
I18N-LangTags           i18n-langtags
Image-Info              ImageInfo
Image-Size              ImageSize
Inline-Files            inline-files
Locale-Maketext         locale-maketext
Locale-Maketext-Fuzzy   locale-maketext-fuzzy
Locale-Maketext-Lexicon locale-maketext-lexicon
Log-Dispatch            log-dispatch
Math-Pari               math-pari
Module-Info             module-info
MogileFS-Server         mogilefs-server
NTLM                    Authen-NTLM
Net-Ping                net-ping
Net-SFTP                net-sftp
Net-SSH-Perl            net-ssh-perl
Net-Server              net-server
OLE-Storage_Lite        OLE-StorageLite

t/11-maps-name.t  view on Meta::CPAN

use CPANPLUS::Dist::Gentoo::Maps;

*nc2g = \&CPANPLUS::Dist::Gentoo::Maps::name_c2g;

is nc2g('CPANPLUS-Dist-Gentoo'), 'CPANPLUS-Dist-Gentoo', 'name_c2g returns non gentooisms correctly';

my %core_gentooisms = (
 'Digest'          => 'digest-base',
 'I18N-LangTags'   => 'i18n-langtags',
 'Locale-Maketext' => 'locale-maketext',
 'Net-Ping'        => 'net-ping',
 'Pod-Parser'      => 'PodParser',
 'PathTools'       => 'File-Spec',
);

for my $dist (sort keys %core_gentooisms) {
 is nc2g($dist), $core_gentooisms{$dist}, "name_c2g('$dist')";
}

my %cpan_gentooisms = (