Импорт библиотечного perl-скрипта с использованием «require» с удалённого сервера

Question

У меня есть библиотечный Perl-скрипт с именем /root/kart/test.pl, и этот библиотечный скрипт импортируется как часть main.pl скрипта.

образец содержимого main.pl:

#!/usr/bin/perl

use strict;
use warnings;

if(-f "/root/kart/test.pl" )
{
       require "/root/kart/test.pl";
}
our @array1;
our @array2;

образец содержимого test.pl:

#!/usr/bin/perl
our @array1=qw(one two three);
our @array2=qw(abc xyz);
.
.
1;

Раньше библиотечный perl-скрипт /root/kart/test.pl был доступен локально, а main.pl работал нормально. Теперь этот скрипт будет доступен только на удаленном узле, но не локально.

Как импортировать Perl-скрипт, используя «require» с удаленного сервера в perl

Answer 1

Обычно вы не можете успешно require ничего, что не существует на локальном компьютере, ни в памяти, ни в виде файла. Так что ваш вопрос будет вращаться о том, как получить доступ на чтение на удаленном компьютере и как скопировать данные из файла test.pl на ваш компьютер.

Есть несколько модулей, таких как The :: Net или lazy , которые автоматизируют загрузку, установку, а затем локальное использование кода для вас, но поскольку ваша ситуация особенная для вас , вам придется самостоятельно найти способ скопировать данные из test.pl на локальный компьютер, а затем eval it.

Возможно, самый простой подход - монтировать удаленную файловую систему.