sub push_button4
 {
 sub push_button1();
 $txt->insert('end',"Opened $filename1\n");
 sub push_button2();
 $txt->insert('end',"Opened $filename2\n");
 sub push_button3();
 $txt->insert('end',"Opened $filename3\n");

...