Server IP : 180.180.241.3 / Your IP : 216.73.216.252 Web Server : Microsoft-IIS/7.5 System : Windows NT NETWORK-NHRC 6.1 build 7601 (Windows Server 2008 R2 Standard Edition Service Pack 1) i586 User : IUSR ( 0) PHP Version : 5.3.28 Disable Function : NONE MySQL : ON | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : C:/Program Files (x86)/Git/lib/perl5/5.8.8/ExtUtils/MakeMaker/ |
Upload File : |
package ExtUtils::MakeMaker::bytes; use vars qw($VERSION); $VERSION = 0.01; my $Have_Bytes = eval q{require bytes; 1;}; sub import { return unless $Have_Bytes; shift; unshift @_, 'bytes'; goto &bytes::import; } 1; =head1 NAME ExtUtils::MakeMaker::bytes - Version-agnostic bytes.pm =head1 SYNOPSIS use just like bytes.pm =head1 DESCRIPTION bytes.pm was introduced with 5.6. This means any code which has 'use bytes' in it won't even compile on 5.5.X. Since bytes is a lexical pragma and must be used at compile time we can't simply wrap it in a BEGIN { eval 'use bytes' } block. ExtUtils::MakeMaker::bytes is just a very thin wrapper around bytes which works just like it when bytes.pm exists and everywhere else it does nothing. =cut