Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- xmlhttp=new XMLHttpRequest();
- var url = "get_data.pl";
- xmlhttp.open("POST", url, true);
- xmlhttp.setRequestHeader("Content-type", "application/x-www-form-urlencoded");
- xmlhttp.onreadystatechange = function() {
- if(xmlhttp.readyState == 4 && xmlhttp.status == 200) {
- alert(xmlhttp.responseText);
- }
- }
- xmlhttp.send(null);
- #!C:/Perl/bin/perl.exe
- use strict;
- use warnings;
- &main;
- sub main()
- {
- print "test";// I'd like the script being executed by Perl interpreter and return the string "test" .
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement