Select Code to Download

print MAIL "To: $form{'usermail'}\n";

victim1@domain.com, victim2@domain.com, victim3@domain.com, etc...

#!/usr/bin/perl -wT

my $username;
If ($form{username} =~ /^([\w.-]+)$/) {
...
else {
 die("invalid username");
}