The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Email::IsFree::CN - Detect whether e-mail is from free provider in China

SYNOPSIS

  use Email::IsFree::CN;

  my $cnfm = Email::IsFree::CN->new;
  print $cnfm->by_domain('163.com');  # print 1
  print $cnfm->by_email('foo@sina.com');  # print 1
  print $cnfm->by_email('bar@vip.163.com');  # print 0

ABSTRACT

This module detects whether an e-mail address belongs to a free e-mail provider in China such as 163.com or sina.com.

DESCRIPTION

This module can be used to screen credit card orders based on e-mail. Many credit card scamsters use free, anonymous email accounts with another person's name to place fraudulent orders.

AUTHOR

Xiaolan Fu <GZ_AF@yahoo.com>

CREDITS

I got the idea from the module Email::IsFree whose author is TJ Mather, thanks.

COPYRIGHT AND LICENSE

Copyright 2009 by Xiaolan Fu

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.