Skip to content

Instantly share code, notes, and snippets.

@stevelippert

stevelippert/better_utf8_example.pl

Created February 12, 2014 17:13
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save stevelippert/8960010 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save stevelippert/8960010 to your computer and use it in GitHub Desktop.
Download ZIP
A bad example of UTF8 decoding JSON text.
Raw
better_utf8_example.pl
#!/usr/local/bin/perl
use JSON;
$jsonData = new JSON;
open my $fh, '<', "/home/slippert/settings.json";
my $rawJSONData = do { local $/; <$fh> };
eval{ $dataModel = $jsonData->utf8->decode($rawJSONData); };
close $fh;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment