Help for this page

Select Code to Download

Select or download this

#check for bad characters
if($FORM{'path'} =~ m/\0|\r|\n/ig){ die "illegal characters"; }

...
    print USERACCESS "$username:$password";
    close(USERACCESS);
}