I would like to use the following code into a script, but i get a 500 error every time
$host=$1;
}orginal code THAT WORKS!:
Code:
if $ENV{'REMOTE_HOST'} =~ /.*\.([^.]*\.[^.]*)/ { $host=$1;
}
Code:
print $1 if $ENV{'REMOTE_HOST'} =~ /.*\.([^.]*\.[^.]*)/;