Сообщения

1

Perl / Компиляция исходников в ByteCode.

« : 06 Марта 2005, 22:31:09 »

использую ActivePerl 5.6.1.

-----test.pl------

#!/usr/bin/perl

print "Привет, мир\\n";

------------------


-----z.pl---------

#!/usr/bin/perl

use ByteLoader 0.04;

------------------


perl -MO=Bytecode test.pl >> z.pl ; - > в этом месте, упорно не хочет превращать в байткод, пишет no such instructions ""

В чем причина?

2

PHP / fopen("http://...")

« : 06 Февраля 2004, 01:36:29 »

 $url1="http://yandex.ru";
 $file1="./back/url1.html";
 $data="";
 $fg=fopen($url1,"r");
 if(!$fg)
 {
 print("Can\'t open $url1\\n");
 return;
 }
 while(!feof($fg))
 {
 $data.= fgets($fg,128);
 }
 fclose($fg);
 
 //сохраняем первый файл
 $fp=fopen($file1,"w");
 if(!$fp)
 {
 print("Can\'t open $file1\\n");
 return;
 }
 fputs($fp,$data);
 fclose($fp);
 
 print "saved";
 ?>
 
 в итоге он мне пишет следующее,
 Warning: php_network_getaddresses: getaddrinfo failed: Temporary failure in name resolution in /var/www/localhost.localdomain/html/expl/get.php on line 15
 
 Warning: fopen("http://yandex.ru", "r") - Bad file descriptor in /var/www/localhost.localdomain/html/expl/get.php on line 15
 Can\'t open http://yandex.ru
 
 в то же время когда
 $url1="http://myhost.localdomain";
 всё работает просто замечательно// почему??? что это за ошибка такая странная???