Leser: 1
8 Einträge, 1 Seite |
$rueckgabewert = `php.exe phpfile.php`;
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
#!/usr/bin/perl
#Fehlerausgabe an Browser
use CGI::Carp qw(fatalsToBrowser);
require LWP::UserAgent;
print "Content-type: text/html\n\n";
my $ua = LWP::UserAgent->new;
$ua->timeout(10);
$ua->agent('Mozilla/5.0');
my $response = $ua->get('http://www.google.de');
if ($response->is_success) {
print $response->content;
}
else {
die $response->status_line;
}
8 Einträge, 1 Seite |