Select Code to Download

use strict;
use warnings;
...
    print "In loop = ";
    print "$_\n";
}

In loop = FETCH: first
In loop = FETCH: second