test111->do_open($liste) or die $!;