AlertPay Developers Community

Script is in PERL

 I finally have the IPN postback working but then the customer is brought to

a sign up form to gain access to members area. This is what I get when I hit submit.(Not a valid alertpay email format).

Here is the section the error comes from:

if ($alertpay =~ /^[\w\-\.]+\@[\w\-]+\.[\w\-\.]+\w$/) {}
 else {
  print $q->header;
  print("Not a valid alertpay email format!");
  exit;
  }

Any ideas would be appreciated.

You can try the following:

 if ($email_address =~ /^(\w¦\-¦\_¦\.)+\@((\w¦\-¦\_)+\.)+[a-zA-Z]{2,}$/) {
    print "$email_address is valid";
}
else {
    print "$email_address is invalid";
}

This code was found here: http://www.webmasterworld.com/forum13/251.htm

This is not exactly the role of AlertPay's Technical Support as each website is unique. As there are many different programming languages, we're not experts in all of them.

We'll do our best to help you when possible, but please understand that we may not be able to completely solve your problem all the time. You may have to outsource the coding to someone who has more expertise.