Select Code to Download

#!/usr/bin/perl -w
use 5.011;

...
  close $fh;

}

package translate;

use 5.006;
...
}

1;    # End of translate

,
source => en,
...
check that BOB-THINKPAD-SL510 has API Access for this API key
at https://console.developers.google.com/cloud-resource-manager
$

    my $r = get_trans( $wgt, $_ );
    for my $trans_rh ( @{ $r->{data}->{translations} } ) {
      #print $trans_rh->{translatedText}, "\n";
...
      push @lines, "\n";
      path("$out_file")->append_utf8(@lines);
    }