Есть ли способ получить экран, чтобы вернуть идентификатор сеанса или pid?

Question

Есть ли способ заставить экран повторить идентификатор сеанса, когда он создает новое окно?

Я работаю над скриптом в perl, и мне нужен экран, чтобы вернуть идентификатор сеанса или PID мне, поэтому я записываю его в массив или хэш.

Answer 1

Какова ваша цель для сбора этих предметов? Это может быть немного сложно в perl. Что-то вроде Unix :: PID может помочь (http://metacpan.org/pod/Unix::PID), но у меня есть подозрение, что ваш вопрос не затрагивает актуальную проблему, которую вы пытаетесь решить.

Поскольку вы используете screen -dmS <somename> вы можете сделать это:

my %screens; 

for($i = 0; $i < 10; $i++) { 
    system("screen -dmS server$i"); 
} 

open(my $fh, "screen -list|"); 
while (<$fh>){ 
    if (/Detached/) { 
    /\s*(\d*)\.(.*?)\s/; 
    my ($pid, $name) = ($1, $2); 
    $screens{$name} = $pid; 
    } 
}; 

Answer 2

Проверка переменной среды $ENV{'STY'} в любых программах работы внутриscreen.

На моих MacOS X 10.6 системы, по крайней мере, он содержит идентификатор сеанса, например .:

29379.ttys000.hostname 

и где первое поле является ПИД.

От внеscreen, вы можете запустить:

screen -list 

, чтобы получить список всех ваших сессий.

В противном случае, это не ясно, как вы на самом деле, начиная с screen в пределах вашего сценария, но если вы используете стандартную fork/exec модель, то ребенок PID доступен после вызова fork будет искомая PID. См. man perlipc для получения дополнительной информации о том, как развернуть дочернюю программу и взаимодействовать с ней.