поместить строку из списка в создающийся файл

Программирование на sh, быть может немного про альтернативные языки
Правила форума
Убедительная просьба юзать теги [code] при оформлении листингов.
Сообщения не оформленные должным образом имеют все шансы быть незамеченными.
Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение ProFTP » 2009-09-21 2:43:55

вот так не так разве как ты говорил http://forum.lissyara.su/viewtopic.php? ... 53#p193139 ?

перепиши на perl, если там надо что-то воставлять, и изменить, то тогда из выборки из СУБД прямо сделай...
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Хостинговая компания Host-Food.ru
Хостинг HostFood.ru
 

Услуги хостинговой компании Host-Food.ru

Хостинг HostFood.ru

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 3:03:58

ну там вводные у тебя две, а у меня то два списка
Z301171463546 - можно пожертвовать мне денег

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение ProFTP » 2009-09-21 3:12:28

ты хочешь вставить в HTML файл?
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 3:13:35

как? в HTML не хочу хочу HTML в файл
Z301171463546 - можно пожертвовать мне денег

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение ProFTP » 2009-09-21 3:14:53

а я разве не вставил HTML в файл?
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 3:16:41

ну вообще похоже что вставил судя по тому куда смотрит носик перенаправления вывода я могу сделать вывод, что движусб я в верном направлении

.

Всё хватит, мне нужен сон и покой иначе я кому то сейчас dd сделаю через /dev/zero
Z301171463546 - можно пожертвовать мне денег

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение ProFTP » 2009-09-21 3:20:22

сделай потом, прямо щас что ли надо?

если что-то другое надо - то там просто вроде бы

если хочешь, дай достпу - сделаю
желательно полностью увидеть что делать

нужно создать в каждом поддомене файл index.php в котором должен лежать код

Код: Выделить всё

<html><head></head><body><p>$_</p></body></html>
где

$_ - строчка которая получается после

Код: Выделить всё

SELECT tfio, fio, phone, license, prikaz, status, notes, city, address, palata FROM ntlist ORDER BY ntlist.tfio ASC
То есть есть поддомен и человека и в поддомене человека о нем информация
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Аватара пользователя
Alex Keda
стреляли...
Сообщения: 35469
Зарегистрирован: 2004-10-18 14:25:19
Откуда: Made in USSR
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение Alex Keda » 2009-09-21 8:19:46

хера, ночью вас колбаснуло...
Убей их всех! Бог потом рассортирует...

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение ProFTP » 2009-09-21 19:17:01

я понял, ну так а что не получается?

ты же сам такое писал http://forum.lissyara.su/viewtopic.php? ... 52#p186702

Код: Выделить всё

   $sth = $dbh->prepare(
        " SELECT tfio, fio, phone, license, prikaz, status, notes, city, address, palata FROM ntlist ORDER BY ntlist.tfio ASC"
    );
    $sth->execute();
    while ( my ($tfio, $fio, $phone, $license, $prikaz, $status, $notes, $city, $address, $palata) = $sth->fetchrow_array ) {

my $text = "$tfio, $fio, $phone, $license, $prikaz, $status, $notes, $city, $address, $palata";

.....

system bla-bla $text bla-bla > 

.....

}
Последний раз редактировалось ProFTP 2009-09-21 19:20:20, всего редактировалось 1 раз.
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 19:20:01

нехрена что то не выходит, чуть на запорол только что всё =)

можт в аську, а то мы тут с тобой до 3 пришествия будем флудить
Z301171463546 - можно пожертвовать мне денег

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 19:58:49

хера, ночью вас колбаснуло...
ну бывает порой, раньше было веселее...
Z301171463546 - можно пожертвовать мне денег

Аватара пользователя
ProFTP
подполковник
Сообщения: 3388
Зарегистрирован: 2008-04-13 1:50:04
Откуда: %&й
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение ProFTP » 2009-09-21 20:03:06

давай в аське,
но тут проде бы по просторней
Pеrl FAQ
perl -e 'print join"",map $$_[rand@$_],([0..9,'a'..'z','A'..'Z'])x30'
ИзображениеИзображение

Dirty.Eager
мл. сержант
Сообщения: 72
Зарегистрирован: 2008-10-25 3:05:59

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение Dirty.Eager » 2009-09-21 20:30:37

zingel писал(а): Вопрос - как взять одну строку из первой переменной и вставить в строку второй переменной, то есть в итоге должно получится что например первая строка должна попасть в файл /var/www/host/data/www/somefuckname/index.php вторая в файл /var/www/host/data/www/somefuckname2/index.php третья в /var/www/host/data/www/somefuckname3/index.php ?
А что, awk уже отменили? :)

Код: Выделить всё

$ cat razbor.sh
#!/bin/sh

# $1 - файл со списком строк
# $2 - файл со списком путей

awk  -v pathsfilename=$2 '
{
    getline pline < pathsfilename;
    print $0 > pline;
}
' $1
Проверка:

Код: Выделить всё

$ ls -1
paths.txt
razbor.sh
texts.txt
$ cat texts.txt
text1
text2
text3
$ cat paths.txt
path1
path2
path3
Запускаем и смотрим что вышло:

Код: Выделить всё

$ /bin/sh razbor.sh texts.txt paths.txt
$ ls -1
path1
path2
path3
paths.txt
razbor.sh
texts.txt
$ cat path1
text1
$ cat path2
text2
$ cat path3
text3

paradox
проходил мимо
Сообщения: 11620
Зарегистрирован: 2008-02-21 18:15:41

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение paradox » 2009-09-21 20:42:59

лучше в жаббер)) там флудить для всех тоже можно

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 20:43:34

Код: Выделить всё

awk: cannot open  for output (Too many open files)
Z301171463546 - можно пожертвовать мне денег

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 20:44:55

ProFTP писал(а):давай в аське,
но тут проде бы по просторней
ну и где ты
Z301171463546 - можно пожертвовать мне денег

Dirty.Eager
мл. сержант
Сообщения: 72
Зарегистрирован: 2008-10-25 3:05:59

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение Dirty.Eager » 2009-09-21 21:10:36

zingel писал(а):

Код: Выделить всё

awk: cannot open  for output (Too many open files)
Пустая строка в файле с путями?

Аватара пользователя
zingel
beastie
Сообщения: 6204
Зарегистрирован: 2007-10-30 3:56:49
Откуда: Moscow
Контактная информация:

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение zingel » 2009-09-21 21:15:31

нет, там была строка пути
Z301171463546 - можно пожертвовать мне денег

Dirty.Eager
мл. сержант
Сообщения: 72
Зарегистрирован: 2008-10-25 3:05:59

Re: поместить строку из списка в создающийся файл

Непрочитанное сообщение Dirty.Eager » 2009-09-21 21:25:05

zingel писал(а):нет, там была строка пути
Закрывай файлы после записи.
Вот так:

Код: Выделить всё

$ cat razbor.sh
#!/bin/sh

# $1 - файл со списком строк
# $2 - файл со списком путей

awk  -v pathsfilename=$2 '
{
    getline pline < pathsfilename;
    print $0 > pline;
    close(pline);
}
' $1
Пример демонстрирует только принцип решения, все проверки надо доделать самостоятельно :)
(существование и читабельность $1, существование и читабельность $2, писабельность в pline и т.д.)

Вот про закрытие файлов:
http://www.gnu.org/manual/gawk/gawk.htm ... -And-Pipes
4.8 Closing Input and Output Redirections

[..skip..]

This helps avoid hard-to-find typographical errors in your awk programs. Here are some of the reasons for closing an output file:

[..skip..]
* To write numerous files, successively, in the same awk program. If the files aren't closed, eventually awk may exceed a system limit on the number of open files in one process. It is best to close each one when the program has finished writing it.