|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Alexander Pashchenko 2:5062/36 01 Nov 2004 19:40:12
To : All
Subject : А есть ли в эхотаге рекурсия?
--------------------------------------------------------------------------------
Блин. Hадо в программе читать конфиг hpt, а он у меня с include.
Hаписал следующую программку.
Однако, после чтения packer.cfg она выходит, хотя должна бы продолжать читать
остальные include.
В чем косяк?
sub rec{
open(F,shift);
while(<F>){
if(/^include/){
my($x)=(split(' ',$_))[1];
print "$x\n";
rec($x);
}
}
close(F);
}
rec('c:\fido2\soft\hpt\hpt.cfg');
Вот файл, который эта программа открывает:
[--Это начало HPT.CFG--]
[...skipped....]
################################################################################
# system's name
Name KALI
# location
Location Volgodonsk
# Sysop name
Sysop Alexander Pashchenko
################################################################################
[...skipped....]
include c:\fido2\soft\hpt\packer.cfg
include c:\fido2\soft\hpt\path.cfg
[...skipped....]
include c:\fido2\soft\hpt\links.cfg
include c:\fido2\soft\hpt\route.cfg
[...skipped....]
include c:\fido2\soft\hpt\echoes.cfg
include c:\fido2\soft\hpt\fechoes.cfg
[--А это кончало HPT.CFG--]
Вот packer.cfg. Это первый include...
[--Это начало packer.cfg--]
## PACKERS #####################################################################
#Unpack "pkunzip -joLqq $a -d $p" 0 504b0304
#pack zip pkzip -a $a $f
Unpack "pkzip25 -extract -nozipextension $a -dir $p" 0 504b0304
pack zip pkzip25 -add -nozipextension $a $f
Unpack "rar e -inul -o+ $a $p" 0 52617221
Pack rar rar a -ep -md1024 -m5 -mm -inul -s $a $f
Unpack "arj e -+ -y $a $p >nul" 0 60ea
Pack arj arj a -+ -e -y $a $f >nul
[--А это кончало packer.cfg--]
Gxis revido _All_!
... Win2k uptime: 0d 1h 3m 46s 972ms
--- Phone(44373) Pager(005)3880173 E-mail(point212<at>mail.ru) ICQ(1911486)
* Origin: В сети каждый показывает своё истинное лицо. (2:5062/36)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
