1 2 3 4 5 6 7 8
print "N3 ist $values_cdb[4]\n"; print "N4 ist $values_cdb[5]\n"; my $test = $node_ID_[4] + $node_ID_[3]; print "test= $test\n"; print "N,$node_ID_[3],\n"; print "N,$node_ID_[4],\n"; print "test('$node_ID_[3]')\n"; print "test('$node_ID_[4]')\n";
1 2 3 4 5
use Data::Dumper; { local $Data::Dumper::Useqq = 1; print Dumper( $node_ID_[4] ); }