CPAN::Groonga

package NG;
use strict;
use warnings;
use Try::Tiny;
use autodie;
use YAML::XS ();
use JSON::XS ();
use XML::Simple;
use Spreadsheet::ParseExcel;
use NG::Autobox;
use NG::Array;
use NG::DB;
use NG::Ex

RT = qw(
  local_run
  remote_run
  fork_run
  taskset

  web_get

  mail_send
  mail_get

  from_json
  from_yaml
  mkdir_p
  rm_r
  cp_r
  read_file
  read_dir
  file_stat

  process_log
  geo_ip

 

Hashtable->new($ref)
      : NG::Array->new($ref);
}

sub from_json {
    my $data = &read_file(@_);
    my $ref  = JSON::XS::decode_json($data);
    return ref($ref) eq 'HASH'
      ? NG::Hashtable->

tmp/file');
    say $f->fstat;

=head1 METHODS

=head2 from_json/yaml

Return Hashtable or Array:

    my $object = NG::File->from_yaml/json($file);

=head2 read_file

    my $filepath = '/home/chenry