Ввод-Вывод в Файл из Perl on NW5.1 = неполучается

Обсуждение технических вопросов по продуктам Novell

Ввод-Вывод в Файл из Perl on NW5.1 = неполучается

Сообщение skoltogyan » 03 авг 2002, 11:36

Неполучается создать обычный файл на томе из Perl.
Делаю так:
#!/sys/perl/lib
use strict;
my $t="DDD\n";
my $t1="sys://1//test.txt";
open FL, "$t1";
print FL $t;
close (FL);
exit(0);

Файл несоздается. Даже если файл создал руками -в него не пишется.

Посоветуйте.
P.S. - знакомство с перлом у меня в зачаточном состоянии..: )
skoltogyan
 
Сообщения: 2037
Зарегистрирован: 12 июл 2002, 19:39
Откуда: Украина, Донецк

Сообщение Михаил Григорьев » 03 авг 2002, 12:00

Ой skoltogyan что то вы понаписали не так:

Во первых #!/sys/perl/lib можно не писать....

print "Content-type: text/html\n\n";
open (FILE1,">>sys:perl/web/1.log");
print FILE1 "Remote IP:",$ENV{'REMOTE_ADDR'},"\n";
print "OK....";
close(FILE1);

Всё просто....
Аватара пользователя
Михаил Григорьев
 
Сообщения: 1462
Зарегистрирован: 04 июн 2002, 12:22
Откуда: Челябинск

Спасибо, полегчало : ) - неписал: >> и >

Сообщение skoltogyan » 03 авг 2002, 14:04

Спасибо, полегчало : ) - неписал: >> и >
skoltogyan
 
Сообщения: 2037
Зарегистрирован: 12 июл 2002, 19:39
Откуда: Украина, Донецк


Вернуться в Novell

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 50

cron