Создание серверных приложений на языке PERL

Travel expense card - monite.com, Berlin, Germany          

Использование дескрипторов файлов.


Чтение строк из файла:

open(EP, "/etc/passwd"); while(<EP&gt) { chomp; print "I saw $_ in the passwdord file!\n"; } close(EP);

Для записи:

print LOGFILE "Finish!\n"; print STDOUT "Finish!\n";

Копирование данных из файла в файл:

open(IN, $a) || die "cannot open $a for reading: $!"; open(OUT, ">$b") || die "cannot create $b: $!"; while(<IN&gt) { print OUT $_; } close(IN) || die "cannot close $a: $!"; close(OUT) || die "cannot close $b: $!";



Содержание раздела