## original as posted by no longer just digit my @headings = ( {key => 'k', name => 'Kanji', class => 'kanji'}, {key => 'skip', name => 'SKIP', class => 'skip-code'}, {key => 'co', name => 'Suggestion', class => 'skip-code'}, {key => 'disc', name => 'Discussion'}, ); ## perltidy defaults my @headings = ( { key => 'k', name => 'Kanji', class => 'kanji' }, { key => 'skip', name => 'SKIP', class => 'skip-code' }, { key => 'co', name => 'Suggestion', class => 'skip-code' }, { key => 'disc', name => 'Discussion' }, ); ## perltidy edited my @headings = ( { key => 'k', name => 'Kanji', class => 'kanji' }, { key => 'skip', name => 'SKIP', class => 'skip-code' }, { key => 'co', name => 'Suggestion', class => 'skip-code' }, { key => 'disc', name => 'Discussion' }, ); ## Data::Dump::dd my @headings = ( { class => "kanji", key => "k", name => "Kanji" }, { class => "skip-code", key => "skip", name => "SKIP" }, { class => "skip-code", key => "co", name => "Suggestion" }, { key => "disc", name => "Discussion" }, ) ; ## rehohy my @headings; $headings[0]{name} = "Kanji"; #d1 $headings[0]{class} = "kanji"; #d1 $headings[0]{key} = "k"; #d1 $headings[1]{name} = "SKIP"; #d1 $headings[1]{class} = "skip-code"; #d1 $headings[1]{key} = "skip"; #d1 $headings[2]{name} = "Suggestion"; #d1 $headings[2]{class} = "skip-code"; #d1 $headings[2]{key} = "co"; #d1 $headings[3]{name} = "Discussion"; #d1 $headings[3]{key} = "disc"; #d1 ## Data::Dumper->new([@_])->Useqq(1)->Indent(1)->Dump my @headings = ( { "name" => "Kanji", "class" => "kanji", "key" => "k" }, { "name" => "SKIP", "class" => "skip-code", "key" => "skip" }, { "name" => "Suggestion", "class" => "skip-code", "key" => "co" }, { "name" => "Discussion", "key" => "disc" } ); ## Data::Dumper->new([@_])->Useqq(1)->Indent(2)->Dump my @headings = ( { "name" => "Kanji", "class" => "kanji", "key" => "k" }, { "name" => "SKIP", "class" => "skip-code", "key" => "skip" }, { "name" => "Suggestion", "class" => "skip-code", "key" => "co" }, { "name" => "Discussion", "key" => "disc" } ); ## hand style my @headings = ( { "name" => "Kanji", "class" => "kanji", "key" => "k" }, { "name" => "SKIP", "class" => "skip-code", "key" => "skip" }, { "name" => "Suggestion", "class" => "skip-code", "key" => "co" }, { "name" => "Discussion", "key" => "disc" } );