my $count = () = glob "Test123123*.txt";