Skip to content

Instantly share code, notes, and snippets.

@peczenyj
Created August 22, 2014 23:03
Show Gist options
  • Save peczenyj/6b39c30ed4d5c8821a2d to your computer and use it in GitHub Desktop.
Save peczenyj/6b39c30ed4d5c8821a2d to your computer and use it in GitHub Desktop.
Como converter um texto para a lingua do P ?
$ perl linguaP.pl "ola tudo bem"
PeO PeLa PeTu PeDo PeBem
use strict;
use warnings;
use feature qw(say);
use Lingua::PT::Hyphenate;
say join " ", map { "Pe" . ucfirst } map { hyphenate($_) } split /\s+/, $ARGV[0];
@rafael2004braga
Copy link

Gostei

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment