Advertisement
Guest User

checkerform

a guest
Jul 21st, 2018
100
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.49 KB | None | 0 0
  1. { local $^W; $agent->current_form->value('Title', 'Mrs'); };
  2. { local $^W; $agent->current_form->value('Main opt-in', 'Y'); };
  3. { local $^W; $agent->current_form->value('Recurring Frequency', 'MONTHLY'); };
  4. { local $^W; $agent->current_form->value('Recurring Payment', 'Y'); };
  5. { local $^W; $agent->current_form->value('Donation Amount', '2'); };
  6. { local $^W; $agent->current_form->value('First Name', ''.$nameoncard.''); };
  7. { local $^W; $agent->current_form->value('Last Name', ''.$element2.''); };
  8. { local $^W; $agent->current_form->value('Address 1', ''.$element3.''); };
  9. { local $^W; $agent->current_form->value('City', ''.$element6.''); };
  10. { local $^W; $agent->current_form->value('Province', ''.$element5.''); };
  11. { local $^W; $agent->current_form->value('Postal Code', ''.$element7.''); };
  12. { local $^W; $agent->current_form->value('phone', ''.$phonenumber.''); };
  13. { local $^W; $agent->current_form->value('Email', ''.$email.''); };
  14. { local $^W; $agent->current_form->value('Country', 'US'); };
  15.  
  16. #{ local $^W; $agent->current_form->value('Credit Card Holder Name', ''.$nameoncard.''); };
  17. { local $^W; $agent->current_form->value('Payment type', ''.$cctype.''); };
  18. { local $^W; $agent->current_form->value('Credit card number', ''.$card.''); };
  19. { local $^W; $agent->current_form->value('Credit card expiry1', ''.$m.''); };
  20. { local $^W; $agent->current_form->value('Credit card expiry2','20'.$y.''); };
  21. { local $^W; $agent->current_form->value('CVV', ''.$verifica.''); };
  22. sleep(02);
  23. $agent->submit();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement