VPF::Получение столбца из файла - Форум программистов

Лана

Дата 12.7.2004, 15:05 (ссылка)

(голосов: 0)

Загрузка ...

Unregistered

Есть файл вида

Код

------ATOMNAMES------ ATOM TYPES     FF      BOND
I J                                I J     CLASS LENGTH LENGTH 
----------------------------------------------------------------------------------------
N1 #1 C2 #2            58 37     0        1.321    1.326
N1 #1 C81 #14        58 37     0        1.335    1.326
N1 #1 H1 #15          58 36     0         1.009   1.019

Необходимо получить все данные столбца FF Length.
Как это сделать?
Заранее благодарна за помощь и совет.

Secandr

Дата 12.7.2004, 15:32 (ссылка)

(нет голосов)

Загрузка ...

Связист

Профиль
Группа: Экс. модератор
Сообщений: 4043
Регистрация: 3.8.2003
Где: Russia, Volgograd

Репутация: нет
Всего: 39

а покажи какие данные нужно выдрать.

--------------------

Мышки плакали, кололись, но продолжали жрать кактусы (с) cisco

korob2001

Дата 12.7.2004, 15:37 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2871
Регистрация: 29.12.2002

Репутация: 6
Всего: 61

Не видно столбцов, воспользуйся кнпкой "КОД".

--------------------

"Время проходит", - привыкли говорить вы по неверному пониманию.
"Время стоит - проходите вы".

ElectricalStorm

Дата 12.7.2004, 16:58 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник Клуба
Сообщений: 547
Регистрация: 22.1.2004

Репутация: 1
Всего: 9

Код


my @a =();
while (<>) {
    next if /ваш критерий/;
    my ($ATOMNAMES, $ATOM_TYPES, $FF, $BOND итд) = split;
    push @a , $FF;
}

print join "," , @a;

если переменые остальные не нужны ставим undef
а можно просто посчитать каким будет по счету FF
и записать короче

Код


my @a =();
while (<>) {
    next if /ваш критерий/;
    push @a , (split)[5]; # или  [split]->[5]
}

print join "," , @a;

--------------------

Нужно знать инструмент, которым пользуешься

Mephisto

Дата 7.6.2007, 10:26 (ссылка)

(нет голосов)

Загрузка ...

Волкъ

Профиль
Группа: Завсегдатай
Сообщений: 1818
Регистрация: 27.8.2003
Где: Питер

Репутация: нет
Всего: 34

Доброго фсем дня...
Хочу подключить свою трубу под линузом (Mandriva 2006). Труба Nokia 2610, кабель CA-45. Из-под винды асилил только подключится при помощи MobiMB v3.4, ничего более не кушало ее. USB кабло определяется как Prolific USB-to-Serial Comm Port. Теперь собсна вопросец... Как ентот мегадевайс подключить под линузом? GPlus ниасилил трубу ни под линузом, ни под виндами... :/

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Системное программирование \| Следующая тема »