view release on metacpan or  search on metacpan

Makefile.PL  view on Meta::CPAN

use strict;
use warnings;
use ExtUtils::MakeMaker;
use IO::Socket::INET;

my $s = IO::Socket::INET->new(
	PeerAddr => 'www.facebook.com:443',
	Timeout => 10
);
unless($s) {
	die 'CGI::Untaint::Facebook needs a permanent connexion to the Internet';
}

WriteMakefile(
    NAME                => 'CGI::Untaint::Facebook',
    AUTHOR              => q{Nigel Horne <njh@bandsman.co.uk>},
    VERSION_FROM        => 'lib/CGI/Untaint/Facebook.pm',
    ABSTRACT_FROM        => 'lib/CGI/Untaint/Facebook.pm',