Data::Printer

DataPrinter.pl

#!/usr/bin/env perl

use strict;
use warnings;
use Data::Printer;


my @hoge = qw(foo bar baz);

p @hoge;

kekka.txt

[
    [0] "foo",
    [1] "bar",
    [2] "baz"
]