:LOOP
perl 555304.pl
goto LOOP