ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Belyakov Sergey                      2:5020/400     26 Dec 2000  10:03:49
 To : All
 Subject : perl - tacacs - DB
 -------------------------------------------------------------------------------- 
 

 Добрый день ALL !!!
 
 Во. Вот решил спросить. Есть база TACACS+ia с файлом user.db.
 Поставил дополнительные модули. Пытаюсь его прочитать .
 
 $DB_HASH = new DB_File::HASHINFO;
 
 tie %h, "DB_File", $filename, O_RDWR, 0666, $DB_HASH
         or die "Cannot open $filename: $!\n";
 
 while (($key, $value) = each(%h))
         {
         print $key, ' = L = ', unpack('L',$value), "\n";
         }
 В ответе получаю рядом с именем кракозябры . В чем здесь дело ??
 
 krp -> `,¶¶¶
 
 update -> :71Д
 
 С уважением Сергей.
 --- ifmail v.2.15dev5
  * Origin: TC (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор