Здравствуйте и добро от Соединенных Штатов UNIX и Linux Форумы! Благодарим Вас за посещение и вступления нашей мирового сообщества.
|
Здравствуйте и добро от Соединенных Штатов UNIX и Linux Форумы! Благодарим Вас за посещение и вступления нашей мирового сообщества.
|
|
Google unix.com
|
|||||||
| Форумы | Регистрация | Правила форума | Ссылки | Альбомы | ЧАВО | Список участников | Календарь | Поиск | Сегодняшние сообщения | Отметить форумы читать |
| Shell программирование и сценарии Почтовые вопросы о KSH, CSH, SH, BASH, Perl, PHP, SED, AWK и скрипты оболочки и оболочки скриптовых языков здесь. |
Подробнее UNIX и Linux Темы форума можно найти полезные
|
||||
| Нить | Резьба для начинающих | Форум | Ответы | Последнее сообщение |
| Вызов Perl скрипта из Perl скрипта | new2ss | Shell программирование и сценарии | 6 | 05-24-2009 06:03 PM |
| Включите PERL сценария в сценарий оболочки Unix | ganapati | UNIX для чайников Вопросы И Ответы | 1 | 04-29-2008 01:18 PM |
| Здесь документа автоматизировать Perl-скрипт, вызов скрипта | hogger84 | Shell программирование и сценарии | 3 | 10-22-2007 11:15 AM |
| Изменить Perl скрипт для работы с TXT - Разрешения сценарий | joangopan | Shell программирование и сценарии | 1 | 09-13-2007 12:38 AM |
| Perl: Perl-скрипт запустить в текущем процессе | Вино | Shell программирование и сценарии | 10 | 12-09-2005 10:45 AM |
 |
Powered By 
|
|
|
LinkBack | Резьба Инструменты | Искать в этом Thread | Оценить Thread | Режимы дисплея |
|
|
06-04-2008
|
||||
|
||||
Perl / Sed скрипт поможет
Привет Все,
Я должен генерировать сценарии Oracle Inster из электронных таблиц Excel отформатирован следующим образом: Цитата:
Цитата:
1 РЭЦ, РЭЦ 2 и т.д., разделители из записей ... Я считаю, жемчужина сценария могут быть написаны для этого ... ничего полезного будет большим подспорьем. Спасибо заранее Sabya |
|
06-04-2008
|
|||||
|
|||||
|
То вроде этого:
(использование nawk / или usr/xpg4/bin/awk по Solaris) Код:
awk 'END {
printf fmt, ++c, tab, cols, values
}
NR == 1 {
tab = $1
fmt = "REC %d: INSERT INTO %s(%s)\nVALUES\n(%s);\n"
next
}
/^REC/ && cols {
printf fmt, ++c, tab, cols, values
cols = ""
values = ""
next
}
{
$2 = $2 ~ /^[0-9]/ ? $2 : q $2 q
cols = cols ? cols "," $1 : $1
values = values ? values "," $2 : $2
}' FS=" *: *" q="'" input
|
|
06-04-2008
|
||||
|
||||
Здравствуйте Radoulov,
Спасибо за Ваш ответ и извините за мое отсутствие знаний в AWK. Я использую Solaris 10 - я попытался следующим образом: Я создал сценарий: chk.awk Цитата:
Хотя я вызове сценария - я получаю следующую ошибку: Цитата:
|
|
06-04-2008
|
||||
|
||||
|
Radoulov дал вам полную AWK команду!! (Вы должны быть более observent)
В вашей формы исполнения, вынуть AWK и одну цитату из приступить И конца команду в ваш скрипт-файл. |
|
06-04-2008
|
||||
|
||||
|
Кроме того, удалите следующие:
FS \u003d "*: *" Q \u003d "" От chk.awk и запустить ваши команды, как: Код:
awk -f chk.awk FS=" *: *" q="'" qqq |
|
06-04-2008
|
||||
|
||||
|
Благодаря Radoulov и Unilover
 Работает как обаяние. Просто небольшой сбой ...  - Не столько владеть для отладки и устранения проблемы ...Все (все остальные записи) выходит за исключением первой записи. Вывод идет так: Цитата:
Цитата:
Кроме первой записи - все остальные отчеты идут отлично. Еще раз спасибо, Sabya |
|
06-04-2008
|
|||||
|
|||||
|
Измените скрипт так:
Код:
#! /usr/xpg4/bin/awk -f
END {
printf fmt, ++c, tab, cols, values
}
NR == 1 {
tab = $1
fmt = "REC %d: INSERT INTO %s(%s)\nVALUES\n(%s);\n"
FS = " *: *"
q = "'"
next
}
/^REC/ && cols {
printf fmt, ++c, tab, cols, values
cols = ""
values = ""
next
}
{
$2 = $2 ~ /^[0-9]/ ? $2 : q $2 q
cols = cols ? cols "," $1 : $1
values = values ? values "," $2 : $2
}
Код:
./script datafile |
|
| Закладки |
| Теги |
| Solaris |
| Резьба Инструменты | Искать в этом Thread |
| Режимы дисплея | Оценить эту ветку |
|
|
Гибридный режим
