Update mainprog.pl