В рейтинге участвует:

групп:

каналов:

Виртуальный сервер на SSD - недорого!

Аренда выделенных и виртуальных серверов (VDS/VPS), хостинг, аренда IP-адресов, администрирование, круглосуточная поддержка

qwarta.ru подробнее

Резервное копирование с проверкой на вирусы!!!

Удобный сервис создания резервных копий на любой сервер сети интернет. Отслеживайте изменения, проверяйте на вирусы. Надежно защитите свой бизнес!

go.backupland.com

Выбираете сервер? Любая конфигурация на заказ!

Аренда физических серверов любых конфигураций под любые запросы - 1С бухгалтерия, игровые сервера, нагруженные проекты, интернет-магазины!

qwarta.ru подробнее

Size: a a a

Modern::Perl

372 membersпожаловаться на группу
2019 December 11

AK

Andrey Konovalov in Modern::Perl
Поясню суть вопроса: нужно при любом уровне линкования симлинками скрипта брать библиотеки именно на основании того, где лежит сам исходный файл, на который по цепочке указывает 20 уровней вложенности симлинков
источник
20:13пожаловаться#1

CN

Cyrill Novgorodcev in Modern::Perl
Andrey Konovalov
Собственно, я сюда приходил, чтобы спросить, нет ли простого способа сделать  
use lib REAL_SCRIPT_PATH . "/../lib";
https://perldoc.perl.org/FindBin.html
источник
20:13пожаловаться#2

AK

Andrey Konovalov in Modern::Perl
Я сделал конечно в 3 строки с abs_path и cwd, но, может, как-то менее геморройно можно?
источник
20:13пожаловаться#3

AK

Andrey Konovalov in Modern::Perl
Cyrill Novgorodcev
https://perldoc.perl.org/FindBin.html
Ну вот почему люди всегда считают других тупее себя? :)
Это в корне неверный подход: в спорте, например, самое опасное - считать соперника слабее себя. Лучше по дефолту считать его сильнее, пока не доказано обратное (что не отменяет обязанности уважать соперника в любом случае).
источник
20:14пожаловаться#4

VG

Vadim Goncharov in Modern::Perl
очевидно, потому что не было добавок вида "FindBin не подходит"
источник
20:15пожаловаться#5

AK

Andrey Konovalov in Modern::Perl
Vadim Goncharov
очевидно, потому что не было добавок вида "FindBin не подходит"
Кирилл предположил, что я не знаю про FindBin. На мой взгляд, это уже фейл :)
источник
20:16пожаловаться#6

VG

Vadim Goncharov in Modern::Perl
sticker.webp
(25.97 Кб)
источник
20:17пожаловаться#7

AK

Andrey Konovalov in Modern::Perl
Собственно, сегодня вот радостно вспомнил о том, что abs_path честно резолвит путь симлинков на любую вложенность (потенциально  опасное свойство, если там нет проверки на закольцованность).
источник
20:18пожаловаться#8

AK

Andrey Konovalov in Modern::Perl
Когда-то реализовал сам этот алгоритм, не зная про abs_path. Но, итить, не хочется опять "микропакет" делать, чтобы все скрипты, которым нужен такой функционал, его юзали :(
источник
20:19пожаловаться#9

c

crux in Modern::Perl
Андрей, может тебе блог завести?
источник
20:41пожаловаться#10

AK

Andrey Konovalov in Modern::Perl
crux
Андрей, может тебе блог завести?
Ну вопрос-то остаётся: можно ли use lib, основанный на реальном пути к скрипту?
источник
20:41пожаловаться#11

AK

Andrey Konovalov in Modern::Perl
И он такой по-моему вполне предметный: скрипт лежит в каталоге приложения и пользуется пакетами из каталогов приложения, а симлинками закидывается куда-то в $PATH
источник
20:42пожаловаться#12

AK

Andrey Konovalov in Modern::Perl
Мне даже странно, что никто этот вопрос не решал никак :)
источник
20:42пожаловаться#13

VG

Vadim Goncharov in Modern::Perl
давно решили и дали ссылку
источник
20:44пожаловаться#14

c

crux in Modern::Perl
Решали через abs_path и т.д. Ты решил тоже. Так может тебе блог завести для остальных размышлений?
источник
20:44пожаловаться#15

AK

Andrey Konovalov in Modern::Perl
Andrey Konovalov
Ну вопрос-то остаётся: можно ли use lib, основанный на реальном пути к скрипту?
Hint: речь именно о том, чтобы сделать это элегатно с минимумом буковок. Как это сделать в тупую - я итак знаю.
источник
20:44пожаловаться#16

VG

Vadim Goncharov in Modern::Perl
наверное всё-таки прочитать линк целиком
источник
20:44пожаловаться#17

AK

Andrey Konovalov in Modern::Perl
crux
Решали через abs_path и т.д. Ты решил тоже. Так может тебе блог завести для остальных размышлений?
Короче, ты не в курсе. Ну ок.
источник
20:45пожаловаться#18

AK

Andrey Konovalov in Modern::Perl
Vadim Goncharov
наверное всё-таки прочитать линк целиком
Месье даже процитирует? :)
источник
20:46пожаловаться#19

c

crux in Modern::Perl
Ок, я не в курсе, я вообще по другому поводу спросил. В чате теряются твои размышления, можно что-то пропустить. А в блоге почитают люди.
источник
20:46пожаловаться#20