Select Code to Download

#!/bbs/opt/bin/csperl5.12
...
MAIN: {
    my $opts = getoptions();
}

sub extract_json {
    my $file = shift;
...
my $json_data = extract_json("$master_conf");

my $decoded_json_obj = decode_json( $json_data);