Perl 基本格式 (Hello、JSON 寫法)

Perl 讀取 JSON 寫法


#!/usr/bin/perl
# apt-get install libjson-perl
# http://search.cpan.org/dist/JSON/

# use JSON qw/to_json from_json/;
use JSON;
use Data::Dumper;

$json_text = '{"a":1}';

print Dumper from_json($json_text);
# $hash = from_json($json_text);
# print $hash->{'a'} . "\n";

Perl Hello 架構寫法範例

DK 寫 Perl 的標準寫法, 主程式都寫於 main() 中, 整個程式看起來會比較容易懂~ 🙂

註: 此為參考寫法, 並非絕對~


#!/usr/bin/perl

use strict;
use warnings;

use Data::Dumper;

sub hello
{
    my $self = shift;

    #print Dumper $self;
    print "hello, " . $self . "\n";
}

sub main
{
    hello('test');
}

main();

__END__

作者: Tsung

對新奇的事物都很有興趣, 喜歡簡單的東西, 過簡單的生活.

發表迴響

這個網站採用 Akismet 服務減少垃圾留言。進一步了解 Akismet 如何處理網站訪客的留言資料