LINUX.ORG.RU

Perl. Добавить из файла в хеш.


0

1

Я в перле нуб, так что если вопрос простой - не пинайте, доки потом почитаю ). Есть некий файл, в котором Ключ1: значение1 Ключ2: значение2

Подскажите, как внести данные в хеш перла?

★★★★★

while (<FILE>) { $hash{$1}=$2 if /([^:]+):(.*)/ }

AITap ★★★★★
()
my %hash = map {/^([^:]+):\s*(.*)$/} <>;
arsi ★★★★★
()

Можно и с помощью модуля:


use Tie::File::AsHash;

tie my %data, 'Tie::File::AsHash', «/tmp/file.txt», split => ':'
or die «error $!»;

Chumka ★★★
()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.