http://qs1969.pair.com?node_id=490521


in reply to Pretty Printing with Data::Dumper

Depends what you want to do. And ill just chime in with yet another dumper to use... :-)

D:\>perl -MData::Dumper -e "@arr = qw (a b c); print Data::Dumper->new +([\@arr])->Indent(0)->Dump" $VAR1 = ['a','b','c']; D:\>perl -MData::Dump::Streamer -e "@arr = qw (a b c); Dump(\@arr)->In +dent(0)->Out()" $ARRAY1 = [ 'a', 'b', 'c' ]; D:\>perl -MData::Dump::Streamer -e "@arr = (qw (a b),(qw(c)) x 4); Dum +p(\@arr)->Names('*arr')->Indent(0)->Out()" @arr = ( 'a', 'b', ( 'c' ) x 4 );

And yet another.

D:\>perl -MData::Dump=dump -e "@arr = (qw (a b),(qw(c)) x 4); print du +mp(\@arr)" ["a", "b", "c", "c", "c", "c"]
---
$world=~s/war/peace/g