foreach (@data){
        print my $target= ucfirst($_->{targetL});
    }