Select Code to Download

$a=0;
LOOP:
...
    goto LOOP;
CONT: print "\n";
}

$a=0;
LOOP:
...
    goto LOOP;
    print "----\n";
}