Есть такая вот прога: print "Введите Имя:\n"; $n = <STDIN>; %name = (a => @raport1, b => @raport2, c => @raport3); @raport1 = (3,5); @raport2 = (4,2); @raport3 = (5,5); print $name{$n}; Но она ни как не хочет ничего выводить на печать(я уже запарился помогите!)[sm=11.gif]
Все конечно круто! Может кто-нибудь мне ответит? Да и линк неплохо бы было получить(где книжка лежит потипу зтого: примеры решения задач на языке perl) Или тут все вымерли?