while($progress<100){
			$bar->value($progress);
			sleep(1);	
			print $progress; #Ausgabe 5
			print \$progress; #Ausgabe 6
			print $ref; #Ausgabe 7
		       }
		       $finish=1;