История изменений
Исправление outtaspace, (текущая версия) :
после поместить их в анонимные хеши
Не понял что значит анонимные хеши, написал как подсказал спинной мозг:
use Data::Dumper;
my ($interface, $ip) = 'em1 192.192.192.192' =~ m{^(\S+) \s (\d+\.\d+\.\d+\.\d+)$}x;
print Dumper({$interface => $ip});
ПС школьники совсем обленились, приносят сюда свои «дамашки».
Исходная версия outtaspace, :
после поместить их в анонимные хеши
Не понял что значит анонимные хеши, написал как подсказал спинной мозг:
use Data::Dumper;
my ($interface, $ip) = 'em1 192.192.192.192' =~ m{^(\S+) \s (\d+\.\d+\.\d+\.\d+)$}x;
print Dumper({interface => $interface, ip => $ip});
ПС школьники совсем обленились, приносят сюда свои «дамашки».