Perl практика



              

Доступ к каталогам.


Пример:

chdir("/etc") die "cannot cd to /etc ($!)";

print "where do you want to go? "; chomp($where = <STDIN&gt); if(chdir $where) { # OK } else { # NOT }




Содержание    Вперед