#! perl
use strict;
use warnings;

my %hash =
(
    key => {'individual name' => [['coordinates'], ['Rotation'], ['height']]},
);

my $coords   = $hash{key}->{'individual name'}[0][0];
my $rotation = $hash{key}->{'individual name'}[1][0];
my $height   = $hash{key}->{'individual name'}[2][0];

print "$_\n" for ($coords, $rotation, $height);

##</code><code>##

16:38 >perl 1014_SoPW.pl
coordinates
Rotation
height

16:38 >