MyWackoSite : Kate Konysheva

Это старая версия KateKonysheva за 2010-07-20 12:29:29..

Это страница Конышевой Екатерины!
Добро пожаловать!

>Как сохранить в качестве ключей хэша ссылки, чтоб можно было корректно разыменовать?

>Нужно создать специальный хэш, ключами которого являются ссылки, преобразованные в строки, и значениями – настоящие ссылки.

>Можно воспользоваться модулем Tie::RefHash. Пример показывает использование объектов ввода/вывода для работы с файловыми манипуляторами.

use Tie::RefHash;
use IO::File;

tie %name, "Tie::RefHash";
foreach $filename(«/etc/termcamp/», «/vminux», «/bin/cat»){

$fh = IO::File->("<$filename") or next;
$name{$fh} = $filename;

}
print “open files: ", join(", values %name”, "\n”);
foreach $file(keys %name){

seek($file, 0, 2);
printf("%s is %d bytes long.\n", $name{$file}, $tell{$file});

}

см.

Html To Wiki?

Конвертер doc2Wiki

MyWackoSite: KateKonysheva ...