Select Code to Download

#!/usr/bin/perl
use strict;
...

print "LOOP EXITED DUE TO BLANK LINE\n";

#!/usr/bin/perl
use strict;
...
}

print "LOOP EXITED DUE TO QUIT \n";