Select Code to Download

xdata => \@xarray,
ydata => \@yarray,

# die Plotfelder/-hashe belegen und hash istart
$ii = -1;
...
print "7 $plotx{7}[3]\n"; # ?
print "8 $plotx{8}[3]\n"; # ?
print "9 $plotx{9}[3]\n";

0 0 0
1 1 0
...
7 7 5
8 8 5
9 9 y

2 3.640000E-04
3 3.640000E-04
...
Use of uninitialized value in concatenation (.) or string at test.pl l
+ine 593.
8 
9 3.640000E-04

ydata => $fnfeld[$ploty[$ii]]->{'fn'},