DB<118> $Data::Dumper::Indent=0
 => 0

  DB<119> $Data::Dumper::Terse =1
 => 1

  DB<120> print Dumper \@result
 => 1
[[1,2,3],[4,5,6],[7,8,9]]