П О Р Т А Л                            
С Е Т Е В Ы Х                          
П Р О Е К Т О В                        
  
Поиск по сайту:
                                                 
Главная

О проекте

Web-мастеру
     HTML & JavaScript
     SSI
     Perl
     PHP
     XML & XSLT
     Unix Shell

MySQL

Безопасность

Хостинг

Другое








Самое читаемое:

Учебник PHP - "Для Чайника".
Просмотров 184079 раз(а).

Иллюстрированный самоучитель по созданию сайтов.
Просмотров 84178 раз(а).

Учебник HTML.
Просмотров 78296 раз(а).

Руководство по PHP5.
Просмотров 48951 раз(а).

Хостинг через призму DNS.
Просмотров 56550 раз(а).

Подборка текстов стандартных документов.
Просмотров 48328 раз(а).

Учебник PHP - Самоучитель
Просмотров 54886 раз(а).

Документация на MySQL (учебник & справочное руководство)
Просмотров 55939 раз(а).

Внешние атаки...
Просмотров 45395 раз(а).

Учебник PHP.
Просмотров 40236 раз(а).

SSI в примерах.
Просмотров 30359 раз(а).



 
 
| Добавить в избранное | Сделать стартовой | Помощь





1. Основные особенности Perl

Алена Федосеева

1.1 Введение

Perl - интерпретируемый язык, приспособленный для обработки произвольных текстовых файлов, извлечения из них необходимой информациии и выдачи сообщений. Perl также удобен для написания различных системных программ. Этот язык прост в использовании, эффективен, но про него трудно сказать, что он элегантен и компактен. Perl сочитает в себе лучшие черты C, shell, sed и awk, поэтому для тех, кто знаком с ними, изучение Perl-а не представляет особого труда. Cинтаксис выражений Perl-а близок к синтаксису C. В отличие от большинства утилит ОС UNIX Perl не ставит ограничений на объем обрабатываемых данных и если хватает ресурсов, то весь файл обрабатывается как одна строка. Рекурсия может быть произвольной глубины. Хотя Perl приспособлен для сканирования текстовых файлов, он может обрабатывать так же двоичные данные и создавать .dbm файлы, подобные ассоциативным массивам. Perl позволяет использовать регулярные выражения, создавать объекты, вставлять в программу на С или C++ куски кода на Perl-е, а также позволяет осуществлять доступ к базам данных, в том числе Oracle.
Ниже приводится в качестве примера небольшая программа, которая осуществляет доступ к Oracle.

#! /usr/local/bin/perl -w
# запуск с ключом печати ошибок.

use Oraperl;
# подключение модуля для работы с Oracle

$system_id = 'T:bdhost.somwere.com:Base';
# описание имени базы данных

$lda = &ora_login($system_id, 'scott','tiger');
# подключение к базе данных пользователя
# scott с паролем tiger

$statement = 'create table MYTABLE
(NAME char(10), TITLE char(20),
ORGANIZATION varchar2(256))';
# SQL команда создания таблицы MYTABLE

$csr = &ora_open($lda, $statement)
|| die $ora_errstr;
# открытие курсора csr,  если это невозможно,
# то осуществляется выход  и печать сообщения об ошибке.

&ora_close($csr);  # закрытие курсора
open(FL, '/home/my_home_directory/my_file')
|| die "Can't open file \n";
# открытие файла, если это невозможно,
# то выход с печатью сообщения об ошибке

while ($string = <FL>) {
  # чтение входного потока из файла с дескриптором FL

  @array = split(/\//,$string);
  # считанная строка разбивается в массив
  # строк, разделителем служит слеш

  $st = 'insert into MYTABLE values(:1,:2,:3)';
  # SQL команда помещения в таблицу некоторых значений

  $csr = &ora_open($lda,$st) || $ora_errstr;
  # открытие курсора или печать
  # сообщения об ошибке и выход

  &ora_bind($csr,$array[0],$array[1],$array[2]);
  # привязка значений переменных к величинам, которые
  # требуется поместить в таблицу

  &ora_close($csr);   # закрытие курсора
}

close FL; # закрытие файла

&ora_commit($lda);
# завершение транзакции в базе данных

&ora_logoff($lda);
# отключение от базы данных

[Назад] [Содержание] [Вперед]



Если Вы не нашли что искали, то рекомендую воспользоваться поиском по сайту: