my $json = JSON->new;
open(INF,$file);
my $tweetFromFile = <INF>;
my $data = $json->decode($tweetFromFile);
my $text = Encode::encode_utf8($data->{"full_text"});
print $text . "\n";
close(INF);