Help for this page
( 'account1' => [ 'lines','lines', ], 'account2' => [ 'lines', ], )
use Data::Dumper; print Dumper(\%FULLLINES);