Я хочу извлечь архив .rar в Perl по указанному пути. я пробовал это:
my $archive= 'text.rar';
my $directory = 'photos';
my $rar = Archive::Rar->new( -archive => $archive );
$rar->Extract(-to => $directory);
но это не сработало, он всегда извлекает его в мою корневую папку...
есть ли какая-нибудь команда, чтобы указать Archive::Rar другой каталог?
Заранее спасибо!
chdir $directory
перед извлечением. Это не совсем красиво, но должно работать. - person TLP   schedule 23.12.2012