package MyModule;

use Lingua::StanfordCoreNLP;

my $pipeline = new Lingua::StanfordCoreNLP::Pipeline(1, 1);

sub process_text {
  my ($self,$text) = @_;
  $pipeline->process( $text );
}