電線の画像

Pointgets.net

写真やサンプルプログラムなど、日々の気になった出来事をメモしてる個人的なブログです。

二次元配列のリファレンスを生成

PerlモジュールのData::Dumperを使用して、二次元配列のリファレンスを出力しました。

#!/opt/local/bin/perl
 
use strict;
use warnings;
use Data::Dumper;
 
print "Content-type: text/plan; charset=utf-8\n\n";
 
my @array = (["a".."z"],["A".."Z"]);
my $ref = [@array];
print Dumper $ref;
 
exit;

サンプルコードです。

$VAR1 = [
          [
            'a',
            'b',
            'c',
            'd',
            'e',
            'f',
            'g',
            'h',
            'i',
            'j',
            'k',
            'l',
            'm',
            'n',
            'o',
            'p',
            'q',
            'r',
            's',
            't',
            'u',
            'v',
            'w',
            'x',
            'y',
            'z'
          ],
          [
            'A',
            'B',
            'C',
            'D',
            'E',
            'F',
            'G',
            'H',
            'I',
            'J',
            'K',
            'L',
            'M',
            'N',
            'O',
            'P',
            'Q',
            'R',
            'S',
            'T',
            'U',
            'V',
            'W',
            'X',
            'Y',
            'Z'
          ]
        ];

出力結果です。

スポンサードリンク
スポンサードリンク