Using an array as a reference is deprecated at /tmp/3dgraphics.perl line 989.
Using an array as a reference is deprecated at /tmp/3dgraphics.perl line 990.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1004.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1004.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1004.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1064.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1064.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1076.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1077.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1081.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1082.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1087.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1091.
Using an array as a reference is deprecated at /tmp/3dgraphics.perl line 1092.
Using an array as a reference is deprecated at /tmp/3dgraphics.perl line 1094.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1101.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1107.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1108.
Using a hash as a reference is deprecated at /tmp/3dgraphics.perl line 1108.
Using an array as a reference is deprecated at /tmp/3dgraphics.perl line 1127.

##</code><code>##

        @AET = sort{ %{$a}->{Xbot} <=> %{$b}->{Xbot} } @AET;