powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / [Perl] Работа с временем
11 сообщений из 11, страница 1 из 1
[Perl] Работа с временем
    #38770188
max_yas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите пожалуйста как закрыть доступ к папке в определенном интервале времени.
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770256
Фотография r u
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
max_yas,

каком именно интервале? дни, часы? минуты

date('Y.m.d H:i:s')
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770406
vkle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
"Папка" - реальная или виртуальная?
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770522
max_yas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
vkle,

Папка реальная. Период времени с 08.00 до 16.00. На Perl.
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770569
vkle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По крону в указанное время класть/удалять .htaccess в данной папке, если вебсервер Апач. Или менять конфиг и перечитывать, если вебсервер другой.
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770606
max_yas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
vkle,

Это не веб-сервер. Просто подскажите как вывести только системное время в виде 08.00.00 на Perl.
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770710
vkle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: php
1.
2.
3.
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
# Ну а дальше использовать по усмотрению, например:
printf("%02d:%02d:%02d", $hour, $min, $sec);
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38770963
TheAthlete
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Можно так (срез):
my ($sec,$min,$hour) = (localtime)[0,1,2];
# Ну а дальше использовать по усмотрению, например:
printf("%02d:%02d:%02d", $hour, $min, $sec);

Для теста:
$ perl -E '($sec,$min,$hour) = (localtime)[0,1,2]; printf("%02d:%02d:%02d\n", $hour,$min,$sec);'
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38771031
vkle
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TheAthleteМожно так (срез):
my ($sec,$min,$hour) = (localtime)[0,1,2] ;Первый раз вижу такую запись :-)

Чем оно лучше/хуже по сравнению с другими рабочими вариантами:
Код: php
1.
my ($sec,$min,$hour) = localtime;

или
Код: php
1.
my ($sec,$min,$hour) = localtime();

?
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38771086
Фотография volodin661
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vkleTheAthleteМожно так (срез):
my ($sec,$min,$hour) = (localtime)[0,1,2] ; 1) Первый раз вижу такую запись :-)

2) Чем оно лучше/хуже ... ?
=============================
1) такая запись приводится в верблюде

2) Если приперло написать покороче : printf "%02d:%02d:%02d\n", (localtime)[2,1,0];
...
Рейтинг: 0 / 0
[Perl] Работа с временем
    #38772290
max_yas
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо огромное.
...
Рейтинг: 0 / 0
11 сообщений из 11, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / [Perl] Работа с временем
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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