$allow_ip=array("10.0.0.1"
"10.0.0.23"
);
if (!in_array($_SERVER['REMOTE_ADDR'], $allow_ip)) {
exit();
}
30 kwi 2010
$allow_ip=array("10.0.0.1"
"10.0.0.23"
);
if (!in_array($_SERVER['REMOTE_ADDR'], $allow_ip)) {
exit();
}
#!/usr/bin/perl -w
use strict;
use XML::Simple;
use Data::Dumper;
my $data = XMLin('nokaut.xml');
print Dumper($data);