while (<DUMP_ACCT_NO>) {
	chomp;
	my ($id, $accno) = split /\|/, $_;
	push @{$hashList{$guid}}, $accno;
}