Select Code to Download

$VAR1 = [
          {
...
            'targetL' => 'vaisseau spatial'
          }
        ];

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