use feature ':5.10';
use JSON::XS;
my $path = 'C:\Downloads';
$path =~ s/\\/\//g;
my $fn = 'twitter_raw.json';
open(IN,"< :encoding(UTF-8)", "$path/$fn") or die "Can't open input: $!\n";
while(<IN>) {
    chop;
    my $j = decode_json($_);
}