my $first_way = @{$ways4track2analyze[0]};

print "--- Dumper:\n";
print Dumper($first_way);

my $first_obj = $first_way->[0];
my $first_start = $first_way->[1];
my $first_end = $first_way->[2];