use Data::Dumper;
$Data::Dumper::Useqq=1;

#...

print Dumper($name_netzwerkkarte);