Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) месяц в человеческом виде / 10 сообщений из 10, страница 1 из 1
13.03.2006, 15:55:54
    #33597163
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
Есть ли способ задать месяц в человеческом виде (01,02,03... а не 1,2,3...)
?
Или надо изгаляться с проверкой что он из одной цифры и добавлять ноль?


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
13.03.2006, 16:03:25
    #33597185
g613
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
lissyara
Есть ли способ задать месяц в человеческом виде (01,02,03... а не 1,2,3...)
?
Или надо изгаляться с проверкой что он из одной цифры и добавлять ноль?


это зависит от того как ты его получить пытаешся...
может sprintf, а может с помощью того модуля которым пользуешся...
...
Рейтинг: 0 / 0
13.03.2006, 16:04:02
    #33597187
Black
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
либо использовать модуль, либо самому дописывать нуль (насколько мне известно)
...
Рейтинг: 0 / 0
13.03.2006, 16:24:54
    #33597276
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
в переменной...
Я так понимаю, что перл слишком умный, и понимая что это число, ноль
откидывает....


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
13.03.2006, 16:30:04
    #33597299
Black
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
lissyara
в переменной...
Я так понимаю, что перл слишком умный, и понимая что это число, ноль
откидывает....


Posted via ActualForum NNTP Server 1.3
Вас спросили, откуда Вы берете дату?
Perl ничего не откидывает ...
...
Рейтинг: 0 / 0
13.03.2006, 16:36:35
    #33597339
g613
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
lissyara
в переменной...
Я так понимаю, что перл слишком умный, и понимая что это число, ноль
откидывает....


ну и инициализируй переменную как строку а не как число в таком случае...
...
Рейтинг: 0 / 0
13.03.2006, 16:55:44
    #33597422
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
ОК. Вот, некорректный пример:
Код: plaintext
1.
2.
3.
/usr/script/work/>perl -e "print `date '+%m'`;"
 3 /usr/script/work/>perl -e "print '`date '+%m'`';"
 03 /usr/script/work/>
родное форматирование оставлено - результат это число вначале строки
Всё-таки перл считает себя слишком умным....


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
13.03.2006, 17:02:54
    #33597448
lissyara
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
Пока так написал
Код: plaintext
1.
$month = `date '+%m'`;
$month = substr($month, 0 , 2 );
Хотя в итоге пришёл к выводу, что проще было из MySQL месяц извлечь, чем на
перл написать...


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
13.03.2006, 17:06:26
    #33597464
Black
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
Хотя в итоге пришёл к выводу, что проще было из MySQL месяц извлечь, чем на
перл написать...
в чем сложность :)?

Time::Format - Easy-to-use date/time formatting
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
use Time::Format qw(%time %strftime %manip);

 $time{$format}
 $time{$format, $unixtime}

 print "Today is $time{'yyyy/mm/dd'}\n";
 print "Yesterday was $time{'yyyy/mm/dd', time-24*60*60}\n";
 print "The time is $time{'hh:mm:ss'}\n";
 print "Another time is $time{'H:mm am tz', $another_time}\n";
 print "Timestamp: $time{'yyyymmdd.hhmmss.mmm'}\n";
...
Рейтинг: 0 / 0
13.03.2006, 17:07:39
    #33597469
g613
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
(PERL) месяц в человеческом виде
lissyara
ОК. Вот, некорректный пример:
Код: plaintext
1.
2.
3.
/usr/script/work/>perl -e "print `date '+%m'`;"
 3 /usr/script/work/>perl -e "print '`date '+%m'`';"
 03 /usr/script/work/>
родное форматирование оставлено - результат это число вначале строки
Всё-таки перл считает себя слишком умным....


вообще он считает что те кто на нем пишет, изначально читали документацию к нему... :) Строка в перле это набор символов заключенный в двойные или одинарные кавычки. В первом случае ты говориш ему писать _число_ 3 ( потому что нет числа 03 ) а во втором _строку_ '03'.

А вообще это был пример того как не надо писать на перле....

perldoc -f time
perldoc -f localtime
perldoc POSIX ( /strftime )
...
Рейтинг: 0 / 0
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) месяц в человеческом виде / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]