|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Sergey V. Leschenko 2:5020/400 21 Aug 2002 10:22:41 To : Andrey Kharchenko Subject : Re: Удалить лишние знаки. --------------------------------------------------------------------------------
Andrey Kharchenko wrote:
AK> Текст читается из текстового файла. Текстовый файл выглядит следующим
AK> образом:
AK>===========
AK> 21.08.02 9:00 20.6 20.7 19.1 21.0 20.4
AK>===========
AK> Первые два столбца дата и время. Заношу все данные в базу mysql.
AK> Задача, как мне только! из 21.08.02 получить 210802 и из 9:00 получить 900
AK> ? Т.е. убрать лишние знаки. Остальные данные должны остаться неизменны.
($date, $time, @other) = split(/\s+/, $line);
$date =~ s/\.//g;
$time =~ s/://;
--
Best regards, sm@adamant.net
Sergey smash@astral.ntu-kpi.kiev.ua
--- ifmail v.2.15dev5
* Origin: Adamant ISP news server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/134117f5358e0.html, оценка из 5, голосов 10
|